similar to: Convert ragged list to structured matrix efficiently

Hello, I have a big problem which I’m just not able to solve. I created the following mean value from the following dataset structure: Id |value 1 | 2 1 | 3 1 | 4 2 | 2 2 | 1 3 | 5 4 | 3 etc.|etc. with the command: mean_rating <- tapply(ratok$value, ratok$project_id , mean,simplify = FALSE) this gives me a ragged array: > mean_rating [1] $`14`

How can I add an extra column containing the rank to a ragged array indexed by more than one grouping factors? E.g. with the barley dataset: How can I to add an additional column ``rank'' containing the rank of the ``yield'' of the different varieties in relation to the indices ``year'' and ``site'' to the barley dataframe? I achieved to calculate the ranks with:

Hi, I have a list made up of character strings with each item a different length (each item is between 1and 6 strings long). Is there a way to convert a "ragged" list to a matrix such that each item is its own row? Here is a simple example: a=list(); a[[1]] = c("a", "b", "c"); a[[2]] = c("d", "e"); a[[3]] = c("f",

Dear All, I have a question of how to export S4 class specification to clusters/workers in parallel computing. The package I used is snowfall. The problem is reproducible as follows. Any hint is greatly appreciated. Edwin Sun === begin =========== library(snowfall) sfInit(parallel = TRUE, cpus = 2) setClass("catt", representation(aa = "numeric")) setClass("dogg",

I have a large dataset (~1 million rows) of three variables: ID (patient's name), DATE (of appointment) and DIAGNOSIS (given on that date). Patients may have been assigned more than one diagnosis at any one appointment - leading to two rows, same ID and DATE but different DIAGNOSIS. The diagnoses may change between appointments. I want to subset the data in two ways: - define groups

I have a dataset that looks like: set.seed(144) sam<-sample(1000,100) dat<-data.frame(id=letters[1:10],value=rnorm(1000),day=c(rep(1,100),rep(2,100),rep(3,100),rep(4,100),rep(5,100))) I want to "normalise" it using the following function (unless you have a better idea...): adj.values<-function(dframe){ value_mean<-mean(dframe$value) value_sd<-sd(dframe$value)

Hi All, I have a question about R parallel computing by using snowfall. How can I set the seeds on parallel workers to get the same result as sequential mode? For example: > sfSapply(c(1,1),rnorm) [1] 1.823082 -2.222052 > rnorm(2) [1] -0.5179967 -1.0807196 How to get the identical result? Thanks. Libo Sun Graduate Student, Department of Statistics, Colorado State University Fort

Just wondering how come read.table lets you specify fill=TRUE for ragged arrays, but so far as I can tell, no equivalent for write.table? Not a big deal, since I'm perfectly comfortable w/ write and scan and the other file I/O goodies. "A foolish inconsistency..." and all that. Carl

In "An Introduction to R" Version 3.3.1, in "4.2 The function tapply() and ragged arrays", after stderr <- function(x) sqrt(var(x)/length(x)) , there is a note in brackets: Writing functions will be considered later in [Writing your own functions], and in this case was unnecessary as R also has a builtin function sd(). The part "in this case was unnecessary as R also

The following single line of code shows what I am trying to do, and the problem I am having... barplot(c(101,102,103),ylim=c(100,103)) The 'xaxis' is missing, and the grey bars 'fall off' the plot area. This is generally ugly, and I would like to trim the bars (ideally they would have a ragged appearance to show that I am 'zooming in'). I can see why what I am trying to

Hi, I've been using LaTeX for a few years on Mac OS X, and I'd like to use it on CentOS now. I installed a complete environment using 'yum groupinstall "Authoring and Publishing"' and then installing tetex-xdvi, plus manually installing the 'memoir' class. I can run 'latex document.tex' ok: the resulting .dvi looks nice in xdvi. When running

Hi: I'm sure this seems like a rudimentary question, but I am not well versed with R syntax for lists. I have a ragged array from which I've removed records (entire rows) with missing data. The functions I used to remove the missing cases resulted in the generation of an R list class object, that looks something like this; mydata [[1]] [,1] [,2] [,3] [1,] 1 2 3 [2,] 4

Hello, I'm trying to create a data frame with three columns, one of which is a variable-length list. I tried: df <- data.frame(name = c("a", "b", "c"), type=c(1, 2, 3), rtn = c(list(1,2,3), list(4, 5,6), list(7,8,9, 10) ) ) This would be useful, for example, if the 'rtn' is a variable number of

Hi, First my apologies for a non-working piece of code in a previous submission, I have corrected this error. I'm doing is individual based modelling of a pathogen and it's host. The way I've thought of doing this is with two dataframes, one of the pathogen and it's genes and effector genes, and one of the host and it's resistance genes. During the simulation, these things

Can anyone please suggest how I can print: a <- matrix(c( "Heading 1", "This is some info\nabout heading 1", "Heading 2", "This is some info\nabout heading 2", ), byrow=T, nrow=2) to look like: Heading 1 This is some info about heading 1 Heading 2 This is some info about heading 2 (if you're not using a fixed width

I wonder what's the right way in R to do the following -- placing objects of the same kind together in subarrays of varying length. Here's what I mean: > word <- c("a","b","c","d","e","f","g","h","i","j") > kind <- c(1,1,1,2,3,4,5,5,7,7) > d <-

It's time again to apply to be a mentoring organization for Google Summer of Code. This means we need to refresh the list of suggested projects at: http://syslinux.zytor.com/wiki/index.php/Google_Summer_of_Code_Ideas I'm running even more ragged than usual, so any help in this would be appreciated. I'd also like to know who'd be willing to mentor this year. -hpa -- H. Peter

Hi: I'm having some difficulty properly subscripting a function to remove complete NA rows from a R array object. Could someone please suggest how best to script this out? Data structure: X is an array with 3 dimensions (replicates, Species, Sites) replicates: 1 to 6 but ragged...not all sites equal ,,Site1 Sp1 Sp2 Sp3... Sp50 1 5 4 3 2 2 3 0 0 1 3 NA NA NA NA 4 NA NA NA NA 5 NA

Dear R users, I am currently writing a MCMC algorithm for spatial Poisson model. One problem which I need to solve is as follows: I have a vector X[1:J] which describes characteristics of cells of a rectangular grid. Further, for each cell I have a list of adjascent cells adj[] and the vector listing numbed of adjascent cells num[]. Thus if I want to list cells adjascent to cell i I write

The following seems weird: > format("\pm2") [1] "pm2" > format("\\pm2") [1] "\\\\pm2" > i.e. it seems impossible to set up a x so that "format(x)" returns "\\pm2", and in turn "cat(format(x))" prints "\pm2". ("\pm" is latex for "plus/minus"). R is version 0.64 for win95. I want to