R将值插入数组中

Alb*_*tti 2 arrays r

我怎样才能转换A.

A <- c(1,2,3,4,5,6,7,8,9)
Run Code Online (Sandbox Code Playgroud)

到B.

B <- c(0,0,1,2,3,0,0,4,5,6,0,0,7,8,9)
Run Code Online (Sandbox Code Playgroud)

我试过这个:

A <-c(1,2,3,4,5,6,7,8,9)
rows <- length(A)/3
dim(a) <- c(rows,3)
B <- matrix(0,rows,2+3)
B[,3:5] <- A

c(B)
Run Code Online (Sandbox Code Playgroud)

但它不起作用.

ags*_*udy 6

为什么不用A转换B:

b <- rep(c(0,0,1,1,1),time=length(A)/3)
b[b==1] <- A
b
[1] 0 0 1 2 3 0 0 4 5 6 0 0 7 8 9
Run Code Online (Sandbox Code Playgroud)