Justificación a la izquierda de una columna mediante texto (gplots o PerformanceAnalytics)

Question

Estoy escribiendo texto en un data.frame en un dispositivo PDF usando textplot() en gplots (también intenté usar la versión en PerformanceAnalytics). Mi par() opciones son la falta de pago, excepto que cambiar la fuente/márgenes (CM es una familia he definido en mi perfil del sitio)

par(family = "CM" , omi = rep(.5 , 4)) 

Estoy intentando conseguir la columna "Plot" que lo dejen justificado. Aquí está mi intento fallido ... cuenta la superposición de texto

textplot(tableOfContents , show.rownames = FALSE , show.colnames = TRUE , hadj = 0) 

obras justificadas a la derecha justo bien:

textplot(tableOfContents , show.rownames = FALSE , show.colnames = TRUE , hadj = 1) 

EDITAR Si alguien más está luchando con la alineación en texplot, que sugieren un vistazo a esta versión modificada que escribí: https://gist.github.com/1487363

Edit2
Es posible que desee quitar mi CeX = 1 dosis. Después de leer un poco más, entiendo que cex en los parámetros de función se deben aplicar a par (cex), que creo que es confuso y sobreingeniería, pero parece ser una práctica estándar R

Answer 1

Al observar el código fuente, piense que la mejor manera es con una ligera modificación para que la posición x se adapte a hadj, en lugar de permanecer constante. También valdría la pena sugerir este cambio al desarrollador. Aquí es una esencia donde se puede descargar la versión modificada:

https://gist.github.com/1482973

A continuación, sólo fuente en R con source(), y usted debería ser capaz de utilizar la función como si fuera normal.

source('textplot.R') 
n = 10 
data = data.frame(Section=1:n, Plot=replicate(n, paste(LETTERS[sample(26, sample(20), replace=T)], collapse='')), Page=sort(rep(1:4, len=n)), stringsAsFactors=FALSE) 

textplot(data, show.rownames = FALSE, show.colnames = TRUE, hadj=0)