Displaying 20 results from an estimated 20000 matches similar to: "How to name matrices from a list with lapply ?"
2005 Oct 07
3
Converting PROC NLMIXED code to NLME
Hi,
I am trying to convert the following NLMIXED code to NLME, but am
running into problems concerning 'Singularity in backsolve'. As I am new
to R/S-Plus, I thought I may be missing something in the NLME code.
NLMIXED
***********
proc nlmixed data=kidney.kidney;
parms delta=0.03 gamma=1.1 b1=-0.003 b2=-1.2 b3=0.09 b4=0.35 b5=-1.43
varu=0.5;
eta=b1*age+b2*sex+b3*gn+b4*an+b5*pkn+u;
2009 Oct 29
3
Removing & generating data by category
Dear R users,
Basically, from the following arbitrary data set:
a <-
data.frame(id=c(c("A1","A2","A3","A4","A5"),c("A3","A2","A3","A4","A5")),loc=c("B1","B2","B3","B4","B5"),clm=c(rep(("General"),6),rep("Life",4)))
> a
2007 Oct 26
1
finding birth position
Hi All,
I have data on the sequence of births for families with completed
fertility cycle (in a data frame); the relevant variables are called b1,
b2, b3, b4, b5, b6 and record the birth of the first, second, ..., sixth
child. So,
b1=1 if the first birth is male,
b1=2 if the first birth is female,
and b1=NA if the family did not record any first birth.
Similarly for b2, b3, b4, b5 and b6.
I
2005 Mar 19
2
simple problem, but not for me
Hello, I'm new in R and I want to do one thing that is very easy in excel, however, I cant do it in R.
Suppose we have the data frame:
data<- data.frame(A=c("a1","a2","a3","a4","a5"))
I need to obtain another column in the same data frame (lets say B=c(b1,b2,b3,b4,b5) in the following way:
b1=a1/(a1+a2+a3+a4+a5)
2013 May 29
3
bootstrap
Hi,
You might need to check library(boot).? I have never used that before.? So, I can't comment much.? It is better to post on R-help list.? I had seen your postings on Nabble in the past.? Unfortunately those postings were not accepted in R-help.? You have to directly post at ? r-help at r-project.org after registering at:
https://stat.ethz.ch/mailman/listinfo/r-help
?
2005 Oct 19
1
nlme Singularity in backsolve at level 0, block 1
Hi,
I am hoping some one can help with this.
I am using nlme to fit a random coefficients model. It ran for hours before returning
Error: Singularity in backsolve at level 0, block 1
The model is
> plavix.nlme<-nlme(PLX_NRX~loglike(PLX_NRX,PD4_42D,GAT_34D,VIS_42D,MSL_42D,SPE_ROL,XM2_DUM,THX_DUM,b0,b1,b2,b3,b4,b5,b6,b7,alpha),
+ data=data,
+ fixed=list(b0 +
2012 Mar 16
2
Elegant Code
Hi,
Can anyone help to write a more elegant version of my code? I am sure
this can be put into a loop but I am having trouble creating the
objects b1,b2,b3,...,etc.
b1 <- rigamma(50,1,1)
theta1 <- rgamma(50,0.5,(1/b1))
sim1 <- rpois(50,theta1)
b2 <- rigamma(50,1,1)
theta2 <- rgamma(50,0.5,(1/b2))
sim2 <- rpois(50,theta2)
b3 <- rigamma(50,1,1)
theta3 <-
2012 Feb 16
2
how to rbind matrices from different loops
Dear R experts,
I am having difficulty using loops productively and would like to please
ask for advice. I have a dataframe of ids and groups. I would like to
break down the dataframe into groups, find the unique sets of ids, then
reassemble. My thought was to use a loop, but I have been unable to finish
this loop in a logical way. I would like to find the unique ids for group
1, group 2,
2012 Dec 16
3
averaging X of specific Y (latitude)
Hello
I have a table describing butterfly range traits.
It is composed of three columns as below
Species name range size (X) latitude of range midpoint (Y)
There are 11 kinds of butterflies.
Each has its range size, and the latitude of each range midpoint ranges
from 9 to 19.
I would like to have the average range size of every degree of latitude.
For example, the average range
2011 Sep 07
1
Reshaping data from wide to tall format for multilevel modeling
Hi,
I'm trying to reshape my data set from wide to tall format for multilevel
modeling. Unfortunately, the function I typically use (make.univ from the
multilevel package) does not appear to work with unbalanced data frames,
which is what I'm dealing with.
Below is an example of the columns of a data frame similar to what I'm
working with:
ID a1 a2 a4 b2 b3 b4 b5 b6
Below
2005 Aug 15
2
queer data set
I have a dataset that is basically structureless. Its dimension varies
from row to row and sep(s) are a mixture of tab and semi colon (;) and
example is
HEADER1 HEADER2 HEADER3 HEADER3
A1 B1 C1 X11;X12;X13
A2 B2 C2 X21;X22;X23;X24;X25
A3 B3 C3
A4 B4 C4 X41;X42;X43
A5 B5 C5 X51
etc., say. Note that a blank
2009 Jul 21
2
Split plot analysis problems
Hello,
I would be very grateful if someone could give me a hand with my split
plot design problems.
So here is my design :
I am studying the crossed-effects of water (wet/dry) and mowing
(mowed/not-mowed = nm) on plant height (PH) within 2 types of plant
communities (Xerobromion and Mesobromion) :
- Within each type of communities, I have localised 4 blocks
- In each block, I have defined
2007 Jul 12
1
how to estimate treatment-interaction contrasts
Hello, R experts,
Sorry for asking this question again again since I really want a help!
I have a two-factor experiment data and like to calculate estimates of
interation contrasts say factor A has levels of a1, a2, and B has
levels of b1, b2, b3, b4, and b5 with 3 replicates. I am not sure the
constrast estimate I got is right using the script below:
2010 Jul 06
1
plotmath vector problem; full program enclosed
Here's another example of my plotmath whipping boy, the Normal distribution.
A colleague asks for a Normal plotted above a series of axes that
represent various other distributions (T, etc).
I want to use vectors of equations in plotmath to do this, but have
run into trouble. Now I've isolated the problem down to a relatively
small piece of working example code (below). If you would
2002 Mar 11
1
problem with deriv3?
Using S+ 6 for Linux and
R 1.4.1
Taking verbatim some lines from S-Plus that work
perfectly, and running them on R, I get an
unexpected error message:
R : Copyright 2002, The R Development Core Team
Version 1.4.1 (2002-01-30)
> library(MASS)
> data <- read.table("/usr/local/data/mcmanus.dat",header=T)
> mcmanus.frm <-
2011 Dec 01
1
hi all.regarding quantile regression results..
i know this is not about R.
After applying quantile regression with t=0.5,0.6 on the data set WBC(
Wisconsin Breast Cancer)with 678 observations and 9 independent
variables(inp1,inp2,...inp9) and 1 dependent variable(op) i have got the
following results for beta values.
when t=0.5(median regression) beta values b1=0.002641,b2=0.045746,b3=0.
2008 Apr 06
1
row by row similarity
Hello all and thanks in advance for any advice.
I am very new to R and have searched my question but have not come up with
anything quite like what I would like to do.
My problem is:
I have a data set for individuals (rows) and values for behaviours
(columns). I would like to know the proportion of shared behaviours for all
possible pairs of individuals. The sum of shared behaviours divided by
2008 Jun 14
1
restricted coefficient and factor in linear regression.
Hi,
my data set is data.frame(id, yr, y, l, e, k).
I would like to estimate Lee and Schmidts (1993, OUP) model in R.
My colleague wrote SAS code as follows:
** procedures for creating dummy variables are omitted **
** di# and dt# are dummy variables for industry and time **
data a2; merge a1 a2 a; by id yr;
proc sysnlin maxit=100 outest=beta2;
endogenous y;
exogenous l e k
2013 Apr 13
1
how to add a row vector in a dataframe
Hi,
Using S=1000
and
simdata <- replicate(S, generate(3000))
#If you want both "m1" and "m0" #here the missing values are 0
res1<-sapply(seq_len(ncol(simdata.psm1)),function(i) {x1<-merge(simdata.psm0[,i],simdata.psm1[,i],all=TRUE); x1[is.na(x1)]<-0; x1})
res1[,997:1000]
#????? [,1]???????? [,2]???????? [,3]???????? [,4]???????
#x1??? Numeric,3000 Numeric,3000
2011 Dec 04
1
xyplot squeezed together
Hi,
I created the following example of a xyplot. The plot actually looks ok
apart from that the
x-axis is pretty squeezed/clinched. I tried aspect="fill" already but I want
to have all 3 sub plots
next to each other. I tried loads of different scaling varieties but with no
significant result...
library(lattice)
N <- 6
d <-