Treceți mai multe variabile în ggtitle R (Programare, R, Ggplot2)

MCP_infiltrator a intrebat.

Am creat câteva variabile pe care aș dori să le trec în ggtitle. Iată variabilele pe care le-am făcut

ip_case_index <- paste("IP Only Case Index =",
                       round(mean(mdc5ip$case_index), digits = 2)
)
oa_case_index <- paste("OA Case Index",round(mean(edata$Std_Pmt_All_Clm / 
                                 edata$Pred_Amt_Renormal),
                            digits = 2)
)
sn_case_index <- paste("IP and SNF Only"
                       ,round(mean(mdc5sn$case_index), digits = 2)
)

Vreau să fac ceva de genul

ggtitle(ip_case_index, oa_case_index, sn_case_index)

Care, desigur, nu returnează formatul de titlu dorit. Cum aș vrea să apară în titlu este așa

ip_case_index
oa_case_index
sn_case_index

În cazul în care fiecare variabilă se află pe propria linie a titlului. Am încercat să folosesc
pentru a adăuga o nouă linie, dar fără succes, am încercat să folosesc atop ceea ce a făcut ca fiecare linie succesivă să fie mai mică, deci greu de văzut, deoarece tratează fiecare variabilă ca pe un subtitlu, astfel încât titlul subtitlu subtitlu subtitlu.

Am încercat, de asemenea, să folosesc mai multe paste() argumente în interiorul lui ggtitle folosind c(paste(), paste(), paste()), , care returnează prima variabilă.

De asemenea, am încercat următoarele:

plot.title = c(ip_case_index, oa_case_index, sn_case_index)
ggtitle(plot.title)

care, de asemenea, o dă doar pe prima.

Așa că sunt puțin confuz cu privire la modul în care să procedez de aici.

Orice ajutor este foarte apreciat.Vă mulțumesc,

2 răspunsuri
eipi10

Am creat niște date false pentru a face codul să funcționeze, dar bineînțeles că îl poți adapta pentru datele tale reale.

dat=data.frame(x=rnorm(10), y=rnorm(10))

ip_case_index <- paste("IP Only Case Index =",
                       round(mean(rnorm(10)), digits = 2))
oa_case_index <- paste("OA Case Index",round(mean(rnorm(10)),
                                             digits = 2))
sn_case_index <- paste("IP and SNF Only"
                       ,round(mean(rnorm(10)), digits = 2))

ggplot(dat, aes(x,y)) + geom_point() + 
  ggtitle(paste0(ip_case_index,"
", oa_case_index, "
", sn_case_index))

Comentarii

  • oh, deci am fost de fapt aproape de a folosi
    doar câteva probleme de formatare, vă mulțumesc pentru ajutor! –  > Por MCP_infiltrator.
  • Da. Ideea generală este de a crea șirul de titluri folosind paste sau paste0 și apoi să o furnizați ca argument pentru ggtitle. –  > Por eipi10.
Alexander F Stevens

Iată o abordare mai directă, folosind paste() pentru a concatena șiruri de caractere de test și variabile. ggtitle(paste(„Țările clasificate în funcție de % din totalul deceselor „, latestDAy), subtitle = paste(„Durata = „, totalDays, ” Days”)))

Tags:,