RosettaCodeData/Task/Extend-your-language/R/extend-your-language-2.r
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

12 lines
200 B
R

for(x in 1:2) for(y in letters[1:2])
{
print(if2(x == 1, y == "a",
"both conditions are true",
x + 99,
{
yy <- rep.int(y, 10)
paste(letters[1:10], yy)
},
NULL
))
}