比如x是一个vector：
x <- 1:10
那么，
x[2]
等同于
"["(x, 2)，就是return向量x的第二个数。
你可以自己试一下。
在你给的程序中，不知道你的data是什么数据类型，如果是一个list：
data <- list(1:10, 2:12)
则
sapply(data, "[", 2)
就是分别取两个list里的第二个数，结果为
2，3
觉得对请采纳。
最开头用了layout，第一个矩阵就matrix(c(2,0,1,3),2,2,byrow=TRUE)说明了画图的顺序：第1个在左下方，第2个在左上方，第3个在右下方，右上方没有图（第i个图对应矩阵里i的位置）。然后widths和heights确定了2列的宽度比、2行的高度比。
