geom_vline con Character xintercept

Question

Tengo un código ggplot que funcionó bien en 0.8.9 pero no en 0.9.1.

voy a representar los datos en theDF y me gustaría trazar una línea vertical en xintercept="2010 Q1."theGrid es simplemente utilizado para crear theDF.

theGrid <- expand.grid(2009:2011, 1:4) 
theDF <- data.frame(YrQtr=sprintf("%s Q%s", theGrid$Var1, theGrid$Var2), 
        Minutes=c(1000, 2200, 1450, 1825, 1970, 1770, 1640, 1920, 1790, 1800, 1750, 1600)) 

El código utilizado es:

g <- ggplot(theDF, aes(x=YrQtr, y=Minutes)) + 
     geom_point() + 
     opts(axis.text.x=theme_text(angle=90)) 

g + geom_vline(data=data.frame(Vert="2010 Q2"), aes(xintercept=Vert)) 

Una vez más, esto funcionó muy bien en R 2.13.2 con ggplot2 0.8.9, pero no lo hace en I 2.14+ con ggplot2 0.9.1.

Una solución es:

g + geom_vline(data=data.frame(Vert=4), aes(xintercept=Vert)) 

Pero eso no es una buena solución para mi problema.

¿Quizás ayudar con scale_x_discrete podría ayudar?

Answer 1

Cuando utiliza un vector de caracteres, o un factor, para el eje x en un gráfico, los valores predeterminados asignados a cada uno de los elementos únicos son simplemente enteros comenzando en 1. Entonces, si sus niveles son c ("A "" B "," C "), entonces las ubicaciones del eje x son c (1,2,3). No existe la ubicación de un personaje, solo una etiqueta de personaje. Si quiere una línea vertical en A, póngalo en 1. Si lo quiere a medio camino entre A y B, entonces colóquelo en 1.5. De nuevo, esos son los valores predeterminados. Si un argumento en particular hizo algo más, puedes resolverlo colocando líneas en algunos lugares y viendo qué sucede.

Answer 2

Usted podría intentar esto:

g + geom_vline(aes(xintercept = which(levels(YrQtr) %in% '2010 Q1'))) 

Esto evita la necesidad de crear un marco de datos ficticios para el nivel de factor seleccionado. El comando which() devuelve el índice (o índices si el lado derecho del operador% en% es un vector) del nivel de factor [s] para asociar con vlines.

Una advertencia con esto es que si algunas de las categorías no aparecen en sus datos y usa drop = TRUE en la escala, entonces las líneas no aparecerán en el lugar correcto.