Initial data commit

Task/Compound-data-type/R/compound-data-type.r

@@ -0,0 +1,20 @@
+mypoint <- list(x=3.4, y=6.7)
+# $x
+# [1] 3.4
+# $y
+# [1] 6.7
+mypoint$x    # 3.4
+
+list(a=1:10, b="abc", c=runif(10), d=list(e=1L, f=TRUE))
+# $a
+# [1]  1  2  3  4  5  6  7  8  9 10
+# $b
+# [1] "abc"
+# $c
+#  [1] 0.64862897 0.73669435 0.11138945 0.10408015 0.46843836 0.32351247
+#  [7] 0.20528914 0.78512472 0.06139691 0.76937113
+# $d
+# $d$e
+# [1] 1
+# $d$f
+# [1] TRUE