在plot里使用latex语法输入标题等相关信息

COS论坛 | 统计之都 COS论坛 | 统计之都 软件应用 S-Plus & R语言 在plot里使用latex语法输入标题等相关信息

该主题包含 0 条回复,1个帖子,最后由  lovebluesky3 周 之前 更新。

查看 1 个帖子(总计 1 个)
  • 作者
    帖子
  • 1 楼

    lovebluesky
    Participant

    如题,不知是否表达清楚,我知道R里有plotmath,方便作图里面输入标题等公式、符号等信息。

    但我觉得使用latex输入公式、希腊字母,特殊符号更方便一些,网上找了一个包叫做latex2exp,但它支持的不是很全,例如不能输入大写希腊字母,只能小写,不知各位还知道其他的包能完成这个任务吗?多说无益,直接上它的示例代码吧。

    
    library(plyr) 
    library(ggplot2) 
    x <‐ seq(0, 4, length.out=100) 
    alpha <‐ 1:5 
    data <‐ mdply(alpha, function(a, x) data.frame(v=a*x^a, x=x), x) 
     
    p <‐ ggplot(data, aes(x=x, y=v, color=X1)) + 
        geom_line() +  
        ylab(TeX('$\\alpha  x^\\alpha$, where $\\alpha \\in 1\\ldots 5$')) + 
        ggtitle(TeX('Using $\\LaTeX$ for plotting in ggplot2. I $\\heartsuit$ ggplot!')) + 
        coord_cartesian(ylim=c(‐1, 10)) + 
        guides(color=guide_legend(title=NULL)) + 
        scale_color_discrete(labels=lapply(sprintf('$\\alpha = %d$', alpha), TeX))  
        # Note that ggplot2 legend labels must be lists of expressions, not vectors of expressions 
     
    print(p)
    
查看 1 个帖子(总计 1 个)

您必须先登录才能回复该主题。