Dimensioni separate per punti e linee in geom_pointrange da ggplot

Question

Uso della funzione ggplotgeom_pointrange(), come si modifica la dimensione del punto e lo spessore della linea separatamente?

Esempio:

# make test data 
df <- data.frame(y=10, ymin=1, ymax=20, x=1) 

# store ggplot object 
p <- ggplot(data=df, aes(y=y, ymin=ymin, ymax=ymax, x=x)) 

# plot 1: big dot and thick line 
p + geom_pointrange(fill='blue', color='grey', shape=21, size=5) 

# plot 2: small dot and thin line (I want small dot and thick line or vice versa) 
p + geom_pointrange(fill='blue', color='grey', shape=21, lwd=1, size=5) 

Plot 1:

Trama 2:

Posso avere un piccolo punto con una linea spessa (o vice -versa)?

Una soluzione alternativa potrebbe essere quella di tracciare la linea e il punto come geomi separati utilizzando geom_point e geom_errorbar. Sfortunatamente, la mia vera applicazione riguarda il jittering, quindi il punto e l'intervallo finiscono in punti diversi (a meno che forse non riesca a controllare il jittering?).

Sono in grado di trovare domande simili su SO (like this), ma non rispondono direttamente a questo.

Grazie!

Answer 1

È possibile utilizzare fatten in combinazione con size:

p + geom_pointrange(fill='blue', color='grey', shape=21, fatten = 20, size = 5) 

p + geom_pointrange(fill='blue', color='grey', shape=21, fatten = .5, size = 5) 

s. ?geom_pointrange:

ingrassare
Un fattore moltiplicativo usato per aumentare la dimensione del barra centrale in geom_crossbar() ed il punto medio in geom_pointrange().