在 Unix 终端中,可以使用命令“less”或“more”逐页查看文本文件。我有一个 300 行的字符向量,我想逐页查看它。你知道 R 中有一个类似的函数吗?
问问题
551 次
1 回答
1
如果您指的是R
环境中的对象(而不是驱动器上的文件),
你可能会喜欢我的小玩具:
short <- function(x=seq(1,20),numel=4,skipel=0,ynam=deparse(substitute(x))) {
ynam<-as.character(ynam)
#clean up spaces
ynam<-gsub(" ","",ynam)
#unlist goes by columns, so transpose to get what's expected
if(is.list(x)) x<-unlist(t(x))
if(2*numel >= length(x)) {
print(x)
}
else {
frist=1+skipel
last=numel+skipel
cat(paste(ynam,'[',frist,'] thru ',ynam,'[',last,']\n',sep=""))
print(x[frist:last])
cat(' ... \n')
cat(paste(ynam,'[',length(x)-numel-skipel+1,'] thru ', ynam, '[', length(x)-skipel,']\n',sep=""))
print(x[(length(x)-numel-skipel+1):(length(x)-skipel)])
}
}
blahblah 版权归我所有,不是 Disney blahblah 免费使用、重复使用、编辑、洒在您的 Wheaties 上等。
于 2013-06-25T11:49:37.853 回答