2017-02-27 1 views
1

나는 mpfr 개체를 포함하는 변수가 있습니다.mpfr 개체를 파일에 쓰기 R

> currentPrice <- mpfr(as.character(reduceData[1, 2])) 
> currentPrice 
1 'mpfr' number of precision 97 bits 
[1] 14.22857142857142857142857143301 

어떻게 그것을 절단과 같은 짧은 버전으로 tranforming없이 텍스트 파일로이 값을 작성할 수 있습니다

> as.numeric(currentPrice) 
[1] 14.22857 

이 관심을 가져 주셔서 감사합니다.

명령 dput 출력이 :

> dput(currentPrice) 
new("mpfr" 
    , .Data = list(<S4 object of class structure("mpfr1", package = "Rmpfr")>) 
) 
+0

'싱크 (파일 이름 .txt)''고양이 (as.numeric (currentPrice));''싱크(); ' – Sathish

+0

@Sathish 아니, 남자. 귀하의 솔루션은 파일에 짧은 값 (** 14.22857 **)을 쓰지만 긴 버전이 필요합니다 (** 14.22857142857142857142857143301 **) –

+0

@Satish 유형의 변수 목록, 클래스 -mpfr –

답변

1

인쇄 방법을 사용하여 파일에 print.mpfr

library('Rmpfr') 
currentPrice <- mpfr('14.22857142857142857142857143301', precBits = 260) 

sink('filename.txt') 
print(currentPrice, digits = 260) 
sink(); 

패키지 Rmpfr에서 출력했다.

# 1 'mpfr' number of precision 260 bits 
# [1] 14.2285714285714285714285714330100000000000000000000000000000000000000000000000037941082567172255283680561956483693602320305788044194384954889318036909905910031240694550294963195196244918820116425935087779567863032980333526378302622106275521218776702880859375 
+0

추가 정보없이 값만 인쇄하는 방법? –

+0

헤더를 숨기는 방법을 모르겠습니다. 헤더를 제거하여 해당 파일을 게시 할 수 있습니다. – Sathish