2013-12-10 2 views
1

결과물을 요약하지 않도록 요약하려고합니다. 그러나 5 열 데이터로 요약을 호출하면 다섯 번째 열이 별도의 행에 배치됩니다. 요약에 의해 반환 된 객체를 반복적으로 인쇄하는 것보다 쉬운 방법이 있기를 바라고 있습니다.열을 요약하지 않기 위해 요약을 어떻게 말합니까?

최고 감사합니다,

조셉

plotit.r

#!/usr/bin/Rscript 
noneData <- read.csv("query.log", header=FALSE, sep="\t"); 
cnames = c('vids', 'partitions', 'localvert', 'remotevert', 
        'cachehits', 'responsetime'); 
colnames(noneData) <- cnames; 
cachenames = c('1', '2', '3', '4', '5'); 
responseCompare = data.frame(
    noneData$responsetime/1000000, 
    noneData$responsetime/1000000, 
    noneData$responsetime/1000000, 
    noneData$responsetime/1000000, 
    noneData$responsetime/1000000 
    ); 
colnames(responseCompare) <- cachenames; 
print("Response Times"); 
summary(responseCompare); 

./plotit.r #output :

[1] "Response Times" 
     1     2     3     4   
Min. : 0.215 Min. : 0.215 Min. : 0.215 Min. : 0.215 
1st Qu.: 395.202 1st Qu.: 395.202 1st Qu.: 395.202 1st Qu.: 395.202 
Median : 459.888 Median : 459.888 Median : 459.888 Median : 459.888 
Mean : 466.726 Mean : 466.726 Mean : 466.726 Mean : 466.726 
3rd Qu.: 530.122 3rd Qu.: 530.122 3rd Qu.: 530.122 3rd Qu.: 530.122 
Max. :3275.916 Max. :3275.916 Max. :3275.916 Max. :3275.916 
     5   
Min. : 0.215 
1st Qu.: 395.202 
Median : 459.888 
Mean : 466.726 
3rd Qu.: 530.122 
Max. :3275.916 
+3

'options (width = 120); 고양이 ("반응 시간"); summary (responseCompare)' –

+2

'summary'이 열을 감싸고 있지 않습니다. Terminal/your gui가 있습니다. –

+0

@RicardoSaporta : 내 터미널/GUI가 열을 감싸고 있지 않습니다. 첫째, 터미널은 모든 열을 표시하기에 충분히 큽니다. 둘째, 파일 (./plotit.r> file.txt)로 출력하면 문제가 반복됩니다. – joseph

답변

3

options() 기능은 당신에게 만드는 방법을 제공합니다 R 콘솔 환경의 부작용 :

names(options()) 
options(width=120) ; cat("Response Times"); summary(responseCompare) 

인쇄 방법은 총 120 개의 문자로 "가상 페이지 끝"에 도달하면 "\ n"만 추가합니다. 열 너비를 계산하고 한 번에 한 행의 일괄 처리 만 인쇄합니다.

관련 문제