RosettaCodeData/Task/Extend-your-language/R/extend-your-language-4.r
2023-07-01 13:44:08 -04:00

13 lines
236 B
R

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