Well, if you really want to produce what SAS does:
ageval = read.table(textConnection('AgeCat FINWT
+ 1 98
+ 2 62
+ 1 75
+ 3 39
+ 4 28
+ 2 47
+ 2 66
+ 4 83
+ 1 19
+ 3 50
+ '),header=TRUE)
one = aggregate(ageval$FINWT,ageval['AgeCat'],sum)
two = prop.table(as.table(one$x)) * 100
three = cumsum(one$x)
four = cumsum(two)
answer = data.frame(AgeCat=one$AgeCat,
+ Frequency=one$x,
+ Percent=as.numeric(two),
+ "Cumulative.Frequency"=three,
+ "Cumulative.Percent"=four)
answer
AgeCat Frequency Percent Cumulative.Frequency Cumulative.Percent
A 1 192 33.86243 192 33.86243
B 2 175 30.86420 367 64.72663
C 3 89 15.69665 456 80.42328
D 4 111 19.57672 567 100.00000
You can probably find the specific part you want from the above code.
- Phil Spector
Statistical Computing Facility
Department of Statistics
UC Berkeley
spec...@stat.berkeley.edu
On Thu, 17 Feb 2011, Krishnan Viswanathan wrote:
I am new to R. I have a data set like this (given below is a fictional
dataset):
AgeCat FINWT
1 98
2 62
1 75
3 39
4 28
2 47
2 66
4 83
1 19
3 50
I need to calculate the weighted distribution of the variable AgeCat.
In SAS i can do:
proc freq data=ageval;
tables agecat;
weight finwt;
run;
What or is there an equivalent in R?
TIA,
Krishnan
--
Krishnan Viswanathan
1101 High Meadow Dr
Tallahassee FL 32311
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
