2013-03-14 12 views
9

Chciałbym dodać mały stół (na przykład jako legendę) do działki w R. Myślę o czymś takim:Dodaj tabelę (bloki tekstu dopasowanego) do wykresu w R

t <- wantedTableMethod(
    row("param1", "param2", "param3", "param4") 
    , row(value11, value12, value13, cell(value14, adj=0)) 
    , row(value21, value22, value23, value24) 
    , row(value31, value32, value33, cell(value34, adj=1)) 
    border = F 
) 
plot(1,1) 
legend("topleft", t) 

Wszystkie wartości kolumny powinny mieć takie samo przesunięcie. Czy coś takiego jest możliwe w R, czy muszę ręcznie wyrównać każdą wartość?

+0

Jaki język (lub pakiet) używasz do utworzenia obiektu 't' tutaj? – mnel

+0

@mnel: Komendy/pakiet jest czymś, czego szukam. Mój przykład jest napisany w "fikcyjnym kodzie R". Polecenia nie istnieją, o ile wiem. Pomyślałem, że to pomoże zrozumieć, co zamierzam zrobić, ... –

Odpowiedz

10

Pakiet plotrix ma addtable2plot funkcji można przekazać data.frame lub matrix do

Korzystając z przykładu ze strony pomocy

library(plotrix) 
testdf<-data.frame(Before=c(10,7,5,9),During=c(8,6,2,5),After=c(5,3,4,3)) 
rownames(testdf)<-c("Red","Green","Blue","Lightblue") 
barp(testdf,main="Test addtable2plot",ylab="Value", 
    names.arg=colnames(testdf),col=2:5) 
# show most of the options 
addtable2plot(0.7 ,8,testdf,bty="o",display.rownames=TRUE,hlines=TRUE, 
    vlines=TRUE,title="The table") 

enter image description here

jest zaprojektowany do pracy w sposób podobny do legend, jak to możliwe.

+0

Sprawia, że ​​chcę przyjrzeć się bliżej 'plotce'. Sprawna funkcja. –

Powiązane problemy