Noia,
Nope. Although sep is helpful for my output, I still get that source echo
that I want to suppress. Here is the code with Noia's suggestion.
BAGA <- c(10,20,20,30,30,30,30,40,
40,40,40,50,50,50,50,50,
60,60,60,60,60,70,70,70,
70,80,80,80,90,90,100)
BAGB <- c(10,10,10,10,10,20,20,20,
20,30,30,30,40,40,50,60,
70,70,80,80,80,90,90,90,
90,100,100,100,100,100)
A <- sample(c(1,2),1)
if (A==1) {
B <- BAGA[sample(length(BAGA),1)]
} else {
B <- BAGB[sample(length(BAGB),1)]
}
cat("X = ", B, sep="")
And the output:
> source('~/Documents/classes/trunk/math15/resources/TIFiles/todd.R')
X = 60
I want to suppress that source echo.
D.
I want this (source('~/ac
--
View this message in context:
http://r.789695.n4.nabble.com/Turning-of-source-echo-tp4641278p4641305.html
Sent from the R help mailing list archive at Nabble.com.
______________________________________________
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.
