2017-10-05 20 views

答えて

1

代わりas.expression()bquote()の組み合わせを試してみてください。

require(ggplot2) 

df <- data.frame(x=rnorm(30),y=rnorm(30)) 

ggplot(df) + 
    geom_point(aes(x=x,y=y,col='blue')) + 
    scale_color_manual("Legend", 
        values='blue', 
        labels=as.expression(bquote('Prior'~beta[3]%in%'(-0.1 0.1)'))) 

出力:

enter image description here

関連する問題