Erstellen eines Datensatzes in R mit seq/rep

Question

Wie kann ich diesen Datensatz in R erstellen, ohne manuell die Zahlen eingeben zu müssen?

Answer 1

Nicht sicher, ob Sie eine Matrix oder einen Datenrahmen werden soll, und nicht sicher, ob meine Lösung „zu viel Tipparbeit“ hat, aber ich hoffe, dass es hilfreich ist.

matrix(c(1:20, 1:20*2, rep(seq(3, 15, by = 3), 4), 
     sapply(seq(4, 20, by = 4), function(x) x * 1:4), 
     1:5, -5:-1, -6:-10, 6:10), ncol = 5) 
#  [,1] [,2] [,3] [,4] [,5] 
# [1,] 1 2 3 4 1 
# [2,] 2 4 6 8 2 
# [3,] 3 6 9 12 3 
# [4,] 4 8 12 16 4 
# [5,] 5 10 15 8 5 
# [6,] 6 12 3 16 -5 
# [7,] 7 14 6 24 -4 
# [8,] 8 16 9 32 -3 
# [9,] 9 18 12 12 -2 
# [10,] 10 20 15 24 -1 
# [11,] 11 22 3 36 -6 
# [12,] 12 24 6 48 -7 
# [13,] 13 26 9 16 -8 
# [14,] 14 28 12 32 -9 
# [15,] 15 30 15 48 -10 
# [16,] 16 32 3 64 6 
# [17,] 17 34 6 20 7 
# [18,] 18 36 9 40 8 
# [19,] 19 38 12 60 9 
# [20,] 20 40 15 80 10 

Answer 2

setNames(data.frame(lapply(1:4, 
          function(x) seq(x, by = x, length.out = 20)), 
        c(1:5, -5:-1, -6:-10, 6:10)), 
     LETTERS[1:5])