RosettaCodeData/Task/Power-set/R/power-set-4.r
2023-07-01 13:44:08 -04:00

3 lines
34 B
R

v <- (1:3)^2
sv <- as.set(v)
2^sv