ggplot - sfaccettatura in base all'output di funzione

Question

Non sono sicuro in che modo sfaccettare una funzione dei dati nell'elemento data di un oggetto ggplot. Nel seguente esempio giocattolo, quello che voglio fare è qualcosa di simile:

df <- data.frame(x=1:8, y=runif(8), z=8:1) 
ggplot(df, aes(x=x, y=y)) + geom_point() + facet_wrap(~ (z %% 2)) 

Ma che dà l'errore: Error in layout_base(data, vars, drop = drop) : At least one layer must contain all variables used for facetting.

posso ottenere il risultato desiderato trasformando il frame di dati:

ggplot(transform(df, z=z%%2), aes(x=x, y=y)) + geom_point() + facet_wrap(~ z) 

ma spesso è desiderabile non utilizzare tale trasformazione, ad esempio se sono già stata data un'oggetto ggplot e voglio aggiungere alcune sfaccettature ad-hoc.

Answer 1

mi sembra familiare, ma non sono mai riuscito a risolverlo - penso che la gestione delle variabili sfaccettate sia meno potente della gestione delle variabili estetiche.

Indirizzamento del requisito di root - a facet ad hoc un ggplot esistente; notare che è possibile sostituire insieme all'ingrosso dei dati (master) di un R ggplot esistente - per esempio

myplot %+% transform(myplot$data, z=z%%2)