[R] Aligning text in the call to the text function
Hi, I have text (see below) that is aligned nicely when printed in the command window in R but when plotted using text function, it does not show alignment unless I use the family=mono in the call to the text function. Is there a way to specify a different font while maintaining the alignment? Eric Alan 1667 3 459 Alan 2001 45 34 John David 1996 2 5235 Thanks for any hints Hocine __ R-help@r-project.org 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.
Re: [R] Aligning text in the call to the text function
On 01/04/2010 3:39 PM, Tighiouart, Hocine wrote:
Hi,
I have text (see below) that is aligned nicely when printed in the
command window in R but when plotted using text function, it does not
show alignment unless I use the family=mono in the call to the text
function. Is there a way to specify a different font while maintaining
the alignment?
Eric Alan 1667 3 459
Alan 2001 45 34
John David 1996 2 5235
Plot each of the parts separately, i.e. plot 9 objects, not 3. You can
use strwidth() to compute how big each part is and adjust the
positioning based on that.
You might also be able to do it using paste() and atop() with an
expression; see ?plotmath. But I think manual positioning is easiest.
Here's an example:
leftalign - function(x, y, m) {
widths - strwidth(m)
dim(widths) - dim(m)
widths - apply(widths, 2, max)
widths - widths + strwidth( )
heights - strheight(m)
dim(heights) - dim(m)
heights - apply(heights, 1, max)
heights - heights*1.5
xoffsets - c(0, cumsum(widths[-length(widths)]))
yoffsets - c(0, -cumsum(heights[-length(heights)]))
text(x + rep(xoffsets, each=nrow(m)),
y + rep(yoffsets, ncol(m)), m, adj=c(0,1))
}
plot(1)
leftalign(0.8, 1.2, matrix(c(Eric Alan 1667, Alan 2001, John
David 1996, 3,45,2,459,34,5235), ncol=3))
Obviously you could make it a lot more elaborate, with left alignment
for some columns and right alignment for others, etc. Probably some
package has already done this.
Duncan Murdoch
__
R-help@r-project.org 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.
Re: [R] Aligning text in the call to the text function
Hi, One option with Grid graphics, m - matrix(c( 1667,3,459, 2001, 45, 34, 1996, 2,5235), dimnames=list(c(Eric Alan, Alan,John David)), ncol=3, byrow=T) ## install.packages(gridExtra, repos=http://R-Forge.R-project.org;) library(gridExtra) grid.table(m, theme=theme.white(row.just=left,core.just=left)) HTH, baptiste On 1 April 2010 21:39, Tighiouart, Hocine htighiou...@tuftsmedicalcenter.org wrote: Hi, I have text (see below) that is aligned nicely when printed in the command window in R but when plotted using text function, it does not show alignment unless I use the family=mono in the call to the text function. Is there a way to specify a different font while maintaining the alignment? Eric Alan 1667 3 459 Alan 2001 45 34 John David 1996 2 5235 Thanks for any hints Hocine __ R-help@r-project.org 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. __ R-help@r-project.org 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.
