search for: meal

Good Day, I have the following: >Date<-c("08/05/08","08/06/08","08/07/08") >Weight<-c(209.4,211.8,210.0) >planned.meal<-cbind(Date,Weight) >planned.meal Date Weight 1 08/05/08, 209.4 2 08/06/08, 211.8 3 08/07/08, 210.0 >write.table(planned.meal, file="plannedMeal1.txt", + quote=FALSE, row.names=FALSE) output on vim editor: Date Weight 08/05/08, 209.4 08/06/08, 211.8 08/07/08,...

Hi all .., I have a large dataset of around 600,000 rows and 600 columns. The first col is codes for Meal A, the second columns is codes for Meal B. The third column is customers IDs where each customer had a combination of meals. Each column of the rest columns contains values 0,1,or 2. The dataset is organised in a way so that the first group of customers had similar meals combinations, this is follo...

...p your dataset. Iterate over the list of data frames split() returns. B. > On Nov 17, 2017, at 12:59 PM, Allaisone 1 <allaisone1 at hotmail.com> wrote: > > > Hi all .., > > > I have a large dataset of around 600,000 rows and 600 columns. The first col is codes for Meal A, the second columns is codes for Meal B. The third column is customers IDs where each customer had a combination of meals. Each column of the rest columns contains values 0,1,or 2. The dataset is organised in a way so that the first group of customers had similar meals combinations, this is follo...

Thanks Boris , this was very helpful but I'm struggling with the last part. 1) I combined the first 2 columns :- library(tidyr) SingleMealsCode <-unite(MyData, MealsCombinations, c(MealA, MealB), remove=FALSE) SingleMealsCode <- SingleMealsCode[,-2] 2) I separated this dataframe into different dataframes based on "MealsCombination" column so R will recognize each meal combination separately : SeparatedGroupsofme...

Something like the following? AllMAFs <- list() for (i in length(SeparatedGroupsofmealsCombs) { AllMAFs[[i]] <- apply(SeparatedGroupsofmealsCombs[[i]], 2, function(x)maf(tabulate(x+1))) } (untested, of course) Also the solution is a bit generic since I don't know what the output of maf() looks like in your case, and I don't understand why you use tabulate because I wou...

...! and this is only for for one dataframe in the list .. I have around 150-200 dataframes.. not sure how R will store these results.. but first I need the analysis to be done correctly. The final output has to be something like this :- > mafsforeachcolumns(I,II,...600)foreachcombination MealsCombinations Cust.ID I II III IV ...... 600 1 33-55 1 0.124 0.10 0.65 0.467 3 5 2...

...for one dataframe in the list .. I have around 150-200 dataframes.. not sure how R will store these results.. but first I need the analysis to be done correctly. The final output has to be something like this :- > > >> mafsforeachcolumns(I,II,...600)foreachcombination > > MealsCombinations Cust.ID I II III IV ...... 600 > 1 33-55 1 0.124 0.10 0.65 0.467 > 3 >...

The loop : AllMAFs <- list() for (i in length(SeparatedGroupsofmealsCombs) { AllMAFs[[i]] <- apply( SeparatedGroupsofmealsCombs[[i]], 2, function(x)maf( tabulate( x+1) )) } gives these errors (I tried this many times and I'm sure I copied it entirely) :- Error in apply(SeparatedGroupsofmealsCombs[[i]], 2, function(x) maf(tabulate(x + : object 'i&...

...;t for the life of me find how to do this in base R, but I'd be surprised if it's not possible. I'm just trying to replace multiple columns at once in a data frame. #load example data data(api) #this displays the three columns and eight rows i'd like to replace apiclus1[ apiclus1$meals > 98 , c( "pcttest" , "api00" , "sch.wide" ) ] #the goal is to replace pcttest with 100, api100 with NA, and sch.wide with "Maybe" #this doesn't work-- apiclus1[ apiclus1$meals > 98 , c( "pcttest" , "api00" , "sch.wide&q...

On 18/11/2017 4:40 PM, Allaisone 1 wrote: > > The loop : > > > AllMAFs <- list() > > for (i in length(SeparatedGroupsofmealsCombs) { > AllMAFs[[i]] <- apply( SeparatedGroupsofmealsCombs[[i]], 2, function(x)maf( tabulate( x+1) )) > } > > > gives these errors (I tried this many times and I'm sure I copied it entirely) :- > > Error in apply(SeparatedGroupsofmealsCombs[[i]], 2, function(x)...

...ric argument to binary operator I think this can be solved by converting columns (I,II,II,..600) into "numeric" instead of the current "int" type as shown below in the structure of "33_55" dataframe . $ 33_55:'data.frame': 256 obs. of 600 variables: ..$ MealsCombinations : chr [1:256] "33_55" "33_55" .... ..$ ID : num [1:256] 1 3 5 ... ..$ I : int [1:256] 1 1 2 1 1 2 1 2 1 1 ... ..$ II : int [1:256] 2 1 2 2 1 2 2 2 2 2 ... ..$ III...

Is there a way of reading in a file in a way that each line becomes a vector: for example: meals.txt breakfast bacon eggs sausage lunch sandwich apple marsbar crisps dinner chicken rice custard pie I want to read in this file and end up with 3 different vectors, one called breakfast which contains "bacon", "eggs", sausage" One called...

The correct code is: for (i in 1:length(SeparatedGroupsofmealsCombs)) { ... I had mentioned that this is untested, but the error is so obvious ... B. > On Nov 18, 2017, at 4:40 PM, Allaisone 1 <allaisone1 at hotmail.com> wrote: > > > The loop : > > AllMAFs <- list() > > for (i in length(SeparatedGroupsofmealsCo...

...2 55 - 56 22. Cmpce code 2 57 - 58 23. HHd Type 1 59 24. Religion 1 60 25. Social group 1 61 26. Land possessed CODE 2 62 - 63 27. Dwelling code 1 64 28. Type dwelling 1 65 29. Type structure 1 66 30. Covered area 6 67 - 72 31. Cook 2 73 - 74 32. Light 1 75 33. Meal taken outside 1 76 34. Ceremony performed 1 77 35. Pds purchase 1 78 36. Get food 1 79 37. Not get food in the month of Jan 2 80 - 81 38. Not get food in the month of Feb 2 82 - 83 39. Not get food in the month of Mar 2 84 - 85 40. Not get food in the month of Apr 2 86 - 87 41. Not get fo...

...s covered somewhere, but I can't seem to find a good explanation. I have an existing table that contains information grouped by date. This is as so: Day NumberOfCustomers NumberOfComplaints 20060512 10040 40 20060513 32420 11 ... I also have a table at the detail level as so: Day Meal PricePaid UsedCupon 20060512 Fish 14 Y 20060512 Chicken 20 N ... Is there a simple way to create summaries on the detail table and then join them into the first table above so that it looks like this: Day NumberOfCustomers NumberOfComplaints AveragePricePaid NumberUsingCupon I can do a t...

Hi! I am quiet new with R and I have some problems to perform a posthoc test with an lme model. My model is the following: >lme1<-lme(eexp~meal+time, random=~1|id,na.action=na.omit) and then i try to get a post hoc test: >summary(glht(lme1,linfct=mcp(meal="Tukey))) but I get a warning message: Erreur dans as.vector(x, mode) : argument 'mode' incorrect Thank you for your help Guillaume -- View this message in context:...

...2.default* Non-visible functions are asterisked > barplot2 function (height, ...) UseMethod("barplot2") <environment: namespace:gplots> Mike -- Michael Pearmain Senior Analytics Research Specialist "I abhor averages. I like the individual case. A man may have six meals one day and none the next, making an average of three meals per day, but that is not a good way to live. ~Louis D. Brandeis" Google UK Ltd Belgrave House 76 Buckingham Palace Road London SW1W 9TQ United Kingdom t +44 (0) 2032191684 mpearmain@google.com If you received this communication by...

...n an invasion, > butcher a hog, conn a ship, design a building, write a sonnet, balance > accounts, build a wall, set a bone, comfort the dying, take orders, > give orders, cooperate, act alone, solve equations, analyze a new > problem, pitch manure, program a computer, cook a tasty meal, fight > efficiently, die gallantly. Specialization is for insects. > ---Heinlein > > -------------- next part -------------- An HTML attachment was scrubbed... URL: <http://lists.digium.com/pipermail/asterisk-users/attachments/20160822/27fc83e0/attachment.html>

..., it would be great if someone could confirm this? In the second part with output to the txt file I get the <U+FF71> type unicode as output not the expected characters. My main problem is how can I output the characters as I expect? > RM_EN <- c("Alfalfa hay","Alfalfa meal","Alfalfa silage") > RM_DE <- c("Luzerneheu","Lurzernegr?nmehl","Luzernesilage") > RM_RU <- c("?????????? ????","?????????? ???????? ????","?????????? ?????") > RM_CN <- c("????","????"...

...020 08:34, Stefan G. Weichinger via samba wrote: > >>> downgrade or fix ;-)? ? >>> >> This hit me yesterday, restart the DC, check with 'ps ax' and I think >> you will find that only 'Samba' has started. If so walk away, have a >> three course meal and go to the cinema, hopefully when you get back, it >> will have finished reindexing your database. > > kind of, yes. short: works now > > longer: reinstalled samba, found samba-ad-dc.service masked (why? who?) > ... unmasked it and decided to restart. Works now. > >...