等同于R控制台中的unix“less”命令
是否有一个相当于在R控制台内可以使用的unix less
命令?
还有page()
,它在page()
上显示一个对象的表示,就像less一样。
dat <- data.frame(matrix(rnorm(1000), ncol = 10)) page(dat, method = "print")
不是真的。 有这些命令
-
head()
和tail()
来显示对象的开始和结束 -
print()
显式显示一个对象,只是它的名字后面跟着是相同的 -
summary()
为简要摘要,取决于对象 -
str()
为其结构
和更多。 less
一个等价物就会与语言和系统有一点正交。 如果Unix shell提供了less
的查看文件的内容(假定是ASCII编码的),它不能知道所有types。
R是不同的,因为它知道对象types,所以summary()
以及整个build模框架更合适。
后续编辑: edit()
和edit.data.frame()
提供了另一种可能性。
我将打印输出保存到文件中,然后使用编辑器或less
的编辑器读取它。
在R中键入以下内容
sink("Routput.txt") print(varname) sink()
然后在一个shell中:
less Routput.txt
你可能会喜欢我的小玩具:
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版权由我,而不是迪斯尼blahblah免费使用,重用,编辑,洒在你的Wheaties等。
如果文件已经在磁盘上,那么你可以使用file.show