Data update

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

@@ -1,20 +1,4 @@
-mypoint <- list(x=3.4, y=6.7)
-# $x
-# [1] 3.4
-# $y
-# [1] 6.7
-mypoint$x    # 3.4
+mypoint <- list(x=3.4, y=6.7) |> print()
+mypoint$x
 
 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