Come aggiungere apici e pedici ai grafici in r

È possibile utilizzare la seguente sintassi di base per aggiungere apici o pedici ai grafici in R:

 #define expression with superscript
x_expression <- expression(x^ 3 ~ variable ~ label)

#define expression with subscript
y_expression <- expression(y[ 3 ] ~ variable ~ label)

#add expressions to axis labels
plot(x, y, xlab = x_expression, ylab = y_expression)

Gli esempi seguenti mostrano come utilizzare questa sintassi nella pratica.

Esempio 1: aggiungere esponenti alle etichette degli assi

Il codice seguente mostra come aggiungere esponenti alle etichette degli assi di un grafico in R:

 #define data
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
y <- c(9, 12, 14, 16, 15, 19, 26, 29)

#define x and y-axis labels with superscripts
x_expression <- expression(x^3 ~ variable ~ label)
y_expression <- expression(y^3 ~ variable ~ label)

#createplot
plot(x, y, xlab = x_expression, ylab = y_expression)

Nota che gli assi X e Y hanno entrambi un esponente nella loro etichetta.

L’esponente dell’asse y è leggermente tagliato nel grafico. Per avvicinare le etichette agli assi del grafico possiamo utilizzare la funzione par() in R:

 #adjust by values (default is (3, 0, 0))
by(mgp=c(2.5, 1, 0))

#createplot
plot(x, y, xlab = x_expression, ylab = y_expression) 

Nota : abbiamo scelto “3” come valore casuale da inserire come esponente. Sentiti libero di inserire qualsiasi valore numerico o carattere come apice.

Esempio 2: aggiungere pedici alle etichette degli assi

Il codice seguente mostra come aggiungere indici alle etichette degli assi di un grafico in R:

 #define data
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
y <- c(9, 12, 14, 16, 15, 19, 26, 29)

#define x and y-axis labels with superscripts
x_expression <- expression(x[3] ~ variable ~ label)
y_expression <- expression(y[3] ~ variable ~ label)

#createplot
plot(x, y, xlab = x_expression, ylab = y_expression) 

Esempio 3: aggiunta di apici e pedici all’interno della trama

Il codice seguente mostra come aggiungere un apice a un elemento di testo all’interno di un percorso:

 #define data
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
y <- c(9, 12, 14, 16, 15, 19, 26, 29)

#createplot
plot(x, y)

#define label with superscript to add to plot
R2_expression <- expression(paste(" ", R^2 , "= ", .905))

#add text to plot
text(x = 2, y = 25, label = R2_expression)

Risorse addizionali

Come creare un grafico a dispersione in R con più variabili
Come creare box plot affiancati in R
Come sovrapporre i grafici in R