2017-12-07 15 views
0

내가 가진 벡터 인쇄하려고 해요 : 내가 할 때제로()

total_nb_visits <- 20302079 
total_nb_visits_y1 <- 19299803 
total_nb_visitors <- 17707555 
total_nb_visitors_y1 <- 17196674 
CVR <- 0.02274954 
CVR_y1 <- 0.02293334 

을 :

exportable <- rbind(c(total_nb_visits,total_nb_visits_y1,((total_nb_visits-total_nb_visits_y1)/total_nb_visits_y1)*100), 
        c(total_nb_visitors,total_nb_visitors_y1,((total_nb_visitors-total_nb_visitors_y1)/total_nb_visitors_y1)*100), 
        c(CVR,CVR_y1,((CVR-CVR_y1)/CVR_y1))) 

을 내가 갖는 :

exportable 
        [,1]    [,2]   [,3] 
[1,] 20302079.00000000 19299803.00000000 5.193192905 
[2,] 17707555.00000000 17196674.00000000 2.970812844 
[3,]  0.02274954  0.02293334 -0.008014533 

그리고 받고 싶습니다 :

    [,1]    [,2]   [,3] 
[1,]   20302079   19299803 5.193192905 
[2,]   17707555   17196674 2.970812844 
[3,]  0.02274954  0.02293334 -0.008014533 
,210

그리고 round() 작동하지 않습니다 ...

나는 또한 과학적 표기법을 삭제 options(scipen=999)와 함께 놀았 던 것을 추가해야이 ...

이 사람이 나를 도울 수

?

감사합니다.

+3

매트릭스에 다른 유형을 저장할 수 없으므로 원하는 출력에 소수점을 포함하면서 정수가 표시됩니다. 프레젠테이션은 예를 들어 테이블에서 다르게 수행 될 수 있지만 개체의 저장소는 결과로 유지됩니다. –

+0

@KevinArseneau 감사합니다. 표시된 표를 인쇄하려면 어떻게해야합니까? 매트릭스에 데이터를 저장하는 대신 작동 할 수있는 다른 유형의 객체를 사용합니까? – Bram

답변

0

이 같은 prettynum 사용할 수 있습니다

exportable <- as.data.table(
    rbind(
    c(prettyNum(total_nb_visits), 
     total_nb_visits_y1, round(((total_nb_visits - total_nb_visits_y1)/total_nb_visits_y1) * 100, 9)), 
    c(total_nb_visitors, 
     total_nb_visitors_y1, 
     round(((total_nb_visitors - total_nb_visitors_y1)/total_nb_visitors_y1) * 100, 9)), 
    c(CVR,CVR_y1, round((CVR-CVR_y1)/CVR_y1, 9)))) 

유일한 단점은 그것이 문자로 값을 변환합니다하지만 당신은 예쁜 출력을 가질 것입니다!

+0

숫자로 유지할 수 없습니까? 문자로 변환해야합니까? – Bram