On 06-09-2012, at 08:54, Sri krishna Devarayalu Balanagu wrote: > Hi everyone > Can anyone help? > > x = c("Treatment", "Planned", "Actual", "Demographics", "Outcomes") > for (i in x) { > df <- paste(i)[, c("Reference_ID", "Arm_ID")] > unique(df) -> uniq > as.data.frame(table(uniq$Reference_ID)) -> y > i.Arms<- paste(y$Var1, y$Freq, sep="_") > Print_Message("Check for the Total No of Arms in Trial_level_info and > print(i) sheet", Trial.Arms, print(i).Arms, "Trial level sheet", "print(i) > sheet") > } > > Error: unexpected symbol in: > "i.Arms<- paste(y$Var1, y$Freq, sep="_") > Print_Message("Check for the Total No of Arms in Trial_level_info and > print(i) sheet", Trial.Arms, print(i).Arms"
print(i).Arms is the culprit. It probably should be print(i.Arms) > Visit us at Booth No. 5 at 2012 ChemOutsourcing Conference, 10-13 Sept 2012, > Ocean Place Resort - Long Branch, NJ, United States > > Visit us at Booth No. 4 at World Conference on Pharmacometrics, 5-7 Sept > 2012, Grand Hilton Hotel, Seoul, Korea Please leave out the commercials. Berend ______________________________________________ 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.