Does something like this help:
> x <- matrix(runif(25,-2,2), 5)
> x
[,1] [,2] [,3] [,4] [,5]
[1,] 0.6188957 -1.14716746 1.9046828 -1.9476897 1.96735448
[2,] -0.5872109 -1.48251061 0.9271700 0.8622643 -0.01762569
[3,] -0.9189594 -0.08752786 -0.5730924 -1.5872631 -0.06260190
[4,] 1.9707362 1.69629788 -0.2741052 -0.2148626 -1.30623066
[5,] 0.5339731 0.39504387 -1.4071538 0.5604042 1.01928378
> x.out <- capture.output(x)[-1]
> # remove row names
> x.new <- sub("^\\S+", "", x.out)
> # replace leading '0's
> x.new <- gsub(" -0", " - ", x.new)
> x.new <- gsub(" 0", " ", x.new)
> x.new
[1] " .6188957 -1.14716746 1.9046828 -1.9476897 1.96735448"
[2] " - .5872109 -1.48251061 .9271700 .8622643 - .01762569"
[3] " - .9189594 - .08752786 - .5730924 -1.5872631 - .06260190"
[4] " 1.9707362 1.69629788 - .2741052 - .2148626 -1.30623066"
[5] " .5339731 .39504387 -1.4071538 .5604042 1.01928378"
>
On Sun, Jan 25, 2009 at 9:58 AM, Ista Zahn <[email protected]> wrote:
> Thanks for the suggestion replacing the leading 0 with a space instead
> of nothing to preserve the layout, and for explaining why there is no
> option for this.
>
> Yes, I see why this sounds like a bad idea. The reason I asked is that
> I use Sweave to write statistical reports, and I like to get the
> formatting as close as possible without editing the .tex file
> afterward. In my field (psychology) it is standard practice to omit
> the leading zeros when reporting statistics whose value cannot exceed
> 1, mainly correlations and p values.
>
> Thanks,
> Ista
> On Sun, Jan 25, 2009 at 2:39 AM, Prof Brian Ripley
> <[email protected]> wrote:
>>
>> The only comprehensive way to do this would be to change R's internaal print
>> mechanisms. (Note that changing 0. to . breaks the layout: changing '0.' to
>> ' .' would be better.)
>>
>> But you haven't told use why you would want to do this. Leaving off leading
>> zeroes makes output harder to read for most people, and indded leading
>> periods are easy to miss (much easier than failing to see that you were
>> asked not to send HTML mail).
>>
>> It would be easy for the cognescenti to add an option to R, but I suspect
>> they all would need a lot of convincing to do so.
>>
>> On Sat, 24 Jan 2009, Ista Zahn wrote:
>>
>>> Dear all,
>>> Is there a simple way to strip the leading "0"'s from R output? For example,
>>> I want
>>> Data <- data.frame(x=rnorm(10), y=x*rnorm(10), z = x+y+rnorm(10))
>>> cor(Data)
>>>
>>> to give me
>>> x y z
>>> x 1.0000000 -.1038904 -.3737842
>>> y -.1038904 1.0000000 .4414706
>>> z -.3737842 .4414706 1.0000000
>>>
>>> Several of you were kind enough to alert me to the existence of gsub a few
>>> weeks ago, so I can do
>>> gsub("0\\.","\\.",cor(Data))
>>>
>>> but I'm hoping someone has a better way (e.g, one that returns an object of
>>> the same class as the original, preserving dimnames, etc.)
>>>
>>> Thanks,
>>> Ista
>>>
>>> [[alternative HTML version deleted]]
>>>
>>> ______________________________________________
>>> [email protected] mailing list
>>> https://stat.ethz.ch/mailman/listinfo/r-help
>>> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
>>> and provide commented, minimal, self-contained, reproducible code.
>>>
>>
>> --
>> Brian D. Ripley, [email protected]
>> Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/
>> University of Oxford, Tel: +44 1865 272861 (self)
>> 1 South Parks Road, +44 1865 272866 (PA)
>> Oxford OX1 3TG, UK Fax: +44 1865 272595
>
> ______________________________________________
> [email protected] mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>
--
Jim Holtman
Cincinnati, OH
+1 513 646 9390
What is the problem that you are trying to solve?
______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
