search for: nage

...1000, replace = TRUE) sex <- gl(2, 8, 1000, c("Male", "Female")) grp <- gl(4, 6, 1000, letters[1:4]) bwplot(grp ~ age | sex, aspect = 0.5, box.ratio = 2, panel = function(x, y, ...) { panel.bpplot(x, y, nout = 0.01, probs = seq(0.05, 0.45, 0.05)) nage <- tapply(age, grp, length) panel.text(rep(0, length(x)), seq(along = x), labels = nage) }) --8<---------------cut here---------------end--------------->8--- I have two problems here: 1. place the sample size as a note in parenthesis next to axis annotation label for the g...

...I am trying to change a SAS macro to R. here is my code. I get an error at the last line. attach(fram) dset1<-cbind(AGE,BMI,DEATH) > BMIGRP<-cut(BMI,breaks=3,right=TRUE) > AGEGRP<-floor(AGE/10)-2 > dset<-cbind(AGEGRP,BMIGRP,DEATH) > maxage<-max(dset[,1]) > minage<-min(dset[,1]) > #maxcls<-dset[,2] > #mincls<-dset[,2] > nage<-maxage-minage+1 > nclass<-maxcls-mincls+1 > nsub<-nrow(dset) > weight <- matrix(,nage,1) > for ( i in minage:maxage ) + {weight[i-minage+1,1] = sum(std = i)} > > atrisk = matrix(,ncla...

Hi, I am trying to runn a age-period-cohort model, but here is what I am having problem with, hope you can help me! This is what I am trying to do: sumzero_a<-((A-min(A))/5+1) - mean((A-min(A))/5+1) where A is my age variable (numeric, the mid-point of a five-year age group), but I got the following error: Error in min(..., na.rm = na.rm) : invalid 'mode' of argument I am pretty

Hi all, I am having a problem getting my fucntion to work correctly. Here is my problem. I have three ages: Nage<-c(1,2,3) I have an weight matrix: Wt<-c( 0.04952867, 0.23808432, 0.34263880) I have an age schedule of maturity: Mat<-c(0,1,1) where 0 is not mature, and 1 is mature I have a vulnerability schedule: Vul<-c(0,1,1) I have an survivorship schedule: Survship<-c(1,0.4,0.16) I also have l...

I'd like to do some plots of historical event data on a reverse log scale, started, say at the year 2000 and going backwards in time, with tick marks spaced according to log(2000-year). For example, see: http://euclid.psych.yorku.ca/SCS/Gallery/images/log-timeline.gif As an example, I'd like to create a density plot of such data with the horizontal axis reverse-logged, a

...all transfert with this Phone. In the IP10S documentation they talk about the 'service key' wich is the key with the white dot on it. With this Key, it should be possible to have a menu with call transfert entries. This menu should (accordingly to the documentation) depend on the call manager. In my case, I have the message 'No available service' instead. What's wrong? Daniel -- Daniel ANDRE (mailto:dandre@iris-tech.fr) IRIS Technologies - http://www.iris-tech.com Serveur kwartz - http://www.kwartz.com

Here is our configuration : SAMBA Server : HPUX 10.20 SAMBA 2.0.3. Only the parameter workgroup has a non default value. There is one share defined (no homes). All share values are default, except read only=no, comment and path (smb.conf is managed with swat which has made some cleaning in the previous smb.conf file) SMB Client : Windows NT 4.0 SP3 or SP4 (both tested) - modified registry to enable plain text password. We can not connect a drive wether from Windows Explorer or with net use : it asks for name and password. After validation...

Hi the list, I use rgl to produce a 3D graph. I would like to "show" this graph to some collaborator. Is there a way to save it and send it to someone else? Christophe Genolini

Hello Everyone,   Learning about R and its wonderful array of functions. If it's not obvious, I usually try to find out what a function stands for. I think this helps me remember better.   One function that has me stumped is "sink." Can anyone tell me if this stands for something?   Thanks,   Paul         __________________________________________________ [[alternative HTML