wiodący indeks górny w wyrażeniu spiskim (w/ggplot2)

Question

Chciałbym użyć plotmath do utworzenia osi zawierającej wiodący indeks górny na wykresie ggplot2. Tworzenie indeksu górnego na etykietach osi działa dobrze, tak jak poniżej:

require(ggplot2) 
ggplot(mtcars, aes(x=disp, y=mpg)) + 
    geom_point() + 
    ylab(expression(x[y])) 

Jednak chciałbym mieć moje etykieta osi czytać „y (górny) x” - logicznie byłoby ^yx, ale to nie będzie parsować:

Error: unexpected '^' in: " 
geom_point() + 
ylab(expression(^" 

Czy istnieje sposób na dodanie indeksu górnego na początku zdania?

Answer 1

Jak o tym:

ggplot(mtcars, aes(x=disp, y=mpg)) + 
    geom_point() + 
    ylab(expression(phantom(0)^y * x)) 

Byłem pewien, że musi być jakiś sposób, żeby zrobić znak „zastępczy”, ale musiałem trochę przewinąć w ?plotmath go znaleźć.