una - Cómo establecer el tamaño de fuente de etiqueta de tira en gráficos de celosía en R
titulo boxplot r (1)
Pruebe esto (buen trabajo al proporcionar un ejemplo):
barchart(choice ~ yes+no+not.app|group, data=data,
par.strip.text=list(cex=2),
stack=TRUE, col=c("green","red","blue"),
xlim=c(0,100), layout=c(3,1),
scales=list(cex=c(1.4,1.4), alternating=3),
xlab=list(label="Percent of Respondents", fontsize=20),
main="")
Para ver más acerca de cómo administrar las características de la tira, escriba ?strip.default
Hay otras palancas para lanzar en strip.custom
. También vea el paquete latticeExtra que tiene la capacidad de poner tiras en los lados con useOuterStrips
.
Creé un diagrama de celosía con tres paneles. Puedo controlar el tamaño de fuente para las etiquetas de eje y tilde, pero no he podido averiguar cómo aumentar el tamaño de fuente de las etiquetas de tira. Aquí hay un ejemplo concreto:
# See below for the fake data to run this code
library(lattice)
barchart(choice ~ yes+no+not.app|group, data=data,
stack=TRUE, col=c("green","red","blue"),
xlim=c(0,100), layout=c(3,1),
scales=list(cex=c(1.4,1.4), alternating=3),
xlab=list(label="Percent of Respondents", fontsize=20),
main="")
Aquí está el gráfico que produce este código. Tenga en cuenta que todas las fuentes son bonitas y grandes, excepto las etiquetas de la tira ("Grupo 1", "Grupo 2", "Grupo 3"). He estado pescando alrededor de R-help y Stack Overflow, pero no he podido solucionar este problema. ¿Alguien sabe el hechizo mágico?
data = structure(list(choice = c("Choice 1", "Choice 1", "Choice 1",
"Choice 2", "Choice 2", "Choice 2", "Choice 3", "Choice 3", "Choice 3",
"Choice 4", "Choice 4", "Choice 4"), group = c("Group 1", "Group 2",
"Group 3", "Group 1", "Group 2", "Group 3", "Group 1", "Group 2",
"Group 3", "Group 1", "Group 2", "Group 3"), yes = c(23.53, 20.47,
22.94, 16.51, 16.54, 16.51, 9.68, 13.39, 10.4, 24.48, 29.92,
25.54), no = c(41.37, 37.01, 40.52, 48.39, 40.94, 46.94, 55.22,
44.09, 53.06, 40.42, 27.56, 37.92), not.app = c(35.1, 42.52,
36.54, 35.1, 42.52, 36.54, 35.1, 42.52, 36.54, 35.1, 42.52, 36.54
)), .Names = c("choice", "group", "yes", "no", "not.app"), row.names = c(NA,
12L), class = "data.frame")