Hi Yihui,

Thank-you for this information. This is the code I am entering into RWeb 
after loading my data file:

#subset the file to only include certain values:

test<-subset(X, GRADE == 7  & Y_Q10A < 9)

#sort the data by province and the variable Y_Q10A

mydata<-test

mydataSorted<-mydata[ order(mydata$PROV,mydata$Y_Q10A), ]

#Weight the data and aggregate it by province and Y_Q10A

myag<-aggregate(mydataSorted$WTPP, 
by=list(mydataSorted$PROV,mydataSorted$Y_Q10A), FUN=sum, na.rm=TRUE)

#print the aggregated data

print(myag)

_
This does not work. RWeb does not show any results. Here is the response I 
am getting from RWeb:

Rweb:> postscript(file= "/tmp/Rout.11012.%03d.ps", onefile=FALSE) 
Rweb:> X <- read.table("/tmp/Rdata.11012.data", header=T) 
Rweb:> attach(X) 
Rweb:> names(X) 
[1] "PUMFID" "PROV"   "REGION" "GRADE"  "Y.Q10A" "WTPP" 
Rweb:> 
Rweb:> 
Rweb:> test<-subset(X, PROV==48 & GRADE == 7  & Y_Q10A < 9) 

How can I modify my code above to get it to work in RWeb, please?

Thanks,

Nat

_________________


"c:/test8.txt" is in *your* local disk, so Rweb cannot read the data
file! You should submit your data to Rweb using the button "Browse"
which will "Select a local file to submit". Note the name of the data
variable will be 'X' (instead of your 'happyguys').

Regards,
Yihui
--
Yihui Xie <xieyihui@gmail.com>
Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086
Mobile: +86-15810805877
Homepage: http://www.yihui.name
School of Statistics, Room 1037, Mingde Main Building,
Renmin University of China, Beijing, 100872, China



On Wed, Oct 22, 2008 at 1:20 AM, Natalie O'Toole <notoole@mtroyal.ca> 
wrote:
> Hi,
>
> How are you? I have a quick question.... I have code that works 
perfectly
> with R desktop, but does not work with RWeb. Could you please tell me 
how
> to modify the code below so it will work with RWeb?
>
>
> #Read in txt file
>
> happyguys<-read.table("c:/test8.txt", header=TRUE, row.names=1)
>
> #Subset the txt file to only include certain values
>
> test<-subset(happyguys, GRADE == 7  & Y_Q10A < 9)
>
> #print the subset file
>
> print(test)
>
> mydata<-test
>
> #Sort the data by province, and then by Y_Q10A
>
> mydataSorted<-mydata[ order(mydata$PROV,mydata$Y_Q10A), ]
> print(mydataSorted)
>
> #Weight the data and aggregate the value by province. There are 2 values
> for each province (1 & 2) and the results show the number of people for
> each province who responded with value 1 or value 2
>
> myag<-aggregate(mydataSorted$WTPP,
> by=list(mydataSorted$PROV,mydataSorted$Y_Q10A), FUN=sum, na.rm=TRUE)
>
> #print the aggregated results
>
> print(myag)
>
> #Results below
>
>  Group.1 Group.2           x
> 1       10       1    466.2879
> 2       11       1    104.7425
> 3       12       1   1200.9314
> 4       13       1    888.4311
> 5       24       1  29040.8215
> 6       35       1   8876.2489
> 7       46       1   1381.7473
> 8       47       1   1508.7270
> 9       48       1   3293.6757
> 10      59       1   4247.5155
> 11      10       2   6623.7504
> 12      11       2   1954.9129
> 13      12       2  11399.5767
> 14      13       2   8811.8096
> 15      24       2  77222.4561
> 16      35       2 145528.7134
> 17      46       2  14010.4974
> 18      47       2  12335.5400
> 19      48       2  41137.2036
> 20      59       2  46261.5873
>
>
>
> Thanks,
>
> Nat
>
>
> 
------------------------------------------------------------------------------------------------------------------------
>
> This communication is intended for the use of the 
recipi...{{dropped:24}}
>
> ______________________________________________
> 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.
>



------------------------------------------------------------------------------------------------------------------------ 

This communication is intended for the use of the recipient to which it is
addressed, and may
contain confidential, personal, and or privileged information. Please 
contact the sender
immediately if you are not the intended recipient of this communication, 
and do not copy,
distribute, or take action relying on it. Any communication received in 
error, or subsequent
reply, should be deleted or destroyed.


------------------------------------------------------------------------------------------------------------------------ 

This communication is intended for the use of the recipient to which it is
addressed, and may
contain confidential, personal, and or privileged information. Please 
contact the sender
immediately if you are not the intended recipient of this communication, 
and do not copy,
distribute, or take action relying on it. Any communication received in 
error, or subsequent
reply, should be deleted or destroyed.
------------------------------------------------------------------------------------------------------------------------ 
This communication is intended for the use of the recipient to which it is addressed, and may
contain confidential, personal, and or privileged information. Please contact the sender
immediately if you are not the intended recipient of this communication, and do not copy,
distribute, or take action relying on it. Any communication received in error, or subsequent
reply, should be deleted or destroyed.
	[[alternative HTML version deleted]]

