Używanie plotmath w ggplot2 ze znakiem procentu (%)

Chciałbym używać znaków greckich, znaków łacińskich i znaku procentu w etykietach aspektów wykresu słupkowego ggplot2. Znaki greckie można zrobić za pomocą „facet_grid (. ~ Zmienna, etykieta = etykieta_parsed)”:

    a<-c("Delta~V","VarcoV","Delta~V","VarcoV")
    b<-c(1,2,3,4)
    d<-c("one","one","two","two")
    mydata<-data.frame(cbind(b,a,d))
    ggplot(mydata,aes(x=d,y=b))+facet_grid(.~a, labeller=label_parsed)+geom_bar(stat="identity")

Teraz chcę też dodać etykietę aspektu, która zawiera% i znak łaciński:

    a<-c("Delta~V","VarcoV","%V","Delta~V","VarcoV","%V")
    b<-c(1,2,3,4,5,6)
    d<-c("one","one","one","two","two","two")
    mydata<-data.frame(cbind(b,a,d))
    ggplot(mydata,aes(x=d,y=b))+facet_grid(.~a, labeller= label_parsed)+geom_bar(stat="identity")

Powoduje to następujący błąd:

    Error in parse(text = x) : <text>:1:1: unexpected input
    1: %V
       ^

Jakieś pomysły, jak dołączyć znak procentu?

questionAnswers(1)

yourAnswerToTheQuestion