R语言绘图时输出希腊字符上下标及数学公式实现方法
目录
- 希腊字母
- 上下标
- paste
- 一个复杂的例子
- 进阶
- 数学公式
通常在我们写论文时，所需要的统计图是非常严谨的，里面的希腊字符与上下脚标都必须要严格书写。因此在使用R绘图时，如何在我们目标图中使用希腊字符、上标、下标及一些数学公式呢？在本博客中我们会进行详细的说明。
后面我们都将以一个最简单的绘图为例，只是将其标题进行修改。
希腊字母
使用希腊字符、上标、下标及数学公式，都需要利用一个函数：expression()，具体使用方式如下：
plot(cars) title(main = expression(Sigma))
输出：
上下标
expression()中的下标为[]，上标为^，空格为~，连接符为*。示例代码如下：
plot(cars) title(main = expression(Sigma[1]~'a'*'n'*'d'~Sigma^2))
输出：
paste
想达到上面的效果，我们其实可以使用paste()与expression()进行组合，不需要上述繁琐的过程，也能够达到我们上述一模一样的输出，并且方便快捷：
plot(cars) title(main = expression(paste(Sigma[1], ' and ', Sigma^2)))
一个复杂的例子
目标：
代码：
expression(paste((frac(1, m)+frac(1, n))^-1, ABCD[paste(m, ',', n)]))
进阶
在我们想批量产生大量含有不同变量值的标题时，如果遇到变量与公式的混合输出该如何操作，
可参考前文：R语言绘图公式与变量对象混合拼接实现方法
数学公式
最后的数学公式，只需要在expression()中进行相应的符号连接即可
具体要求可参考：Mathematical Annotation in R
鉴于其很不稳定，这里将里面的细节搬运过来。
（下表也可以直接在 R help 中搜索 plotmath 获取。）
| Syntax | Meaning |
|---|---|
| x + y | x plus y |
| x - y | x minus y |
| x*y | juxtapose x and y |
| x/y | x forwardslash y |
| x %±% y | x plus or minus y |
| x %/% y | x divided by y |
| x %*% y | x times y |
| x %.% y | x cdot y |
| x[i] | x subscript i |
| x^2 | x superscript 2 |
| paste(x, y, z) | juxtapose x, y, and z |
| sqrt(x) | square root of x |
| sqrt(x, y) | yth root of x |
| x == y | x equals y |
| x != y | x is not equal to y |
| x < y | x is less than y |
| x <= y | x is less than or equal to y |
| x > y | x is greater than y |
| x >= y | x is greater than or equal to y |
| !x | not x |
| x %~~% y | x is approximately equal to y |
| x %=~% y | x and y are congruent |
| x %==% y | x is defined as y |
| x %prop% y | x is proportional to y |
| x %~% y | x is distributed as y |
| plain(x) | draw x in normal font |
| bold(x) | draw x in bold font |
| italic(x) | draw x in italic font |
| bolditalic(x) | draw x in bolditalic font |
| symbol(x) | draw x in symbol font |
| list(x, y, z) | comma-separated list |
| … | ellipsis (height varies) |
| cdots | ellipsis (vertically centred) |
| ldots | ellipsis (at baseline) |
| x %subset% y | x is a proper subset of y |
| x %subseteq% y | x is a subset of y |
| x %notsubset% y | x is not a subset of y |
| x %supset% y | x is a proper superset of y |
| x %supseteq% y | x is a superset of y |
| x %in% y | x is an element of y |
| x %notin% y | x is not an element of y |
| hat(x) | x with a circumflex |
| tilde(x) | x with a tilde |
| dot(x) | x with a dot |
| ring(x) | x with a ring |
| bar(xy) | xy with bar |
| widehat(xy) | xy with a wide circumflex |
| widetilde(xy) | xy with a wide tilde |
| x %<->% y | x double-arrow y |
| x %->% y | x right-arrow y |
| x %<-% y | x left-arrow y |
| x %up% y | x up-arrow y |
| x %down% y | x down-arrow y |
| x %<=>% y | x is equivalent to y |
| x %=>% y | x implies y |
| x %<=% y | y implies x |
| x %dblup% y | x double-up-arrow y |
| x %dbldown% y | x double-down-arrow y |
| alpha – omega | Greek symbols |
| Alpha – Omega | uppercase Greek symbols |
| theta1, phi1, sigma1, omega1 | cursive Greek symbols |
| Upsilon1 | capital upsilon with hook |
| aleph | first letter of Hebrew alphabet |
| infinity | infinity symbol |
| partialdiff | partial differential symbol |
| nabla | nabla, gradient symbol |
| 32*degree | 32 degrees |
| 60*minute | 60 minutes of angle |
| 30*second | 30 seconds of angle |
| displaystyle(x) | draw x in normal size (extra spacing) |
| textstyle(x) | draw x in normal size |
| scriptstyle(x) | draw x in small size |
| scriptscriptstyle(x) | draw x in very small size |
| underline(x) | draw x underlined |
| x ~~ y | put extra space between x and y |
| x + phantom(0) + y | leave gap for “0”, but don't draw it |
| x + over(1, phantom(0)) | leave vertical gap for “0” (don't draw) |
| frac(x, y) | x over y |
| over(x, y) | x over y |
| atop(x, y) | x over y (no horizontal bar) |
| sum(x[i], i==1, n) | sum x[i] for i equals 1 to n |
| prod(plain§(X==x), x) | product of P(X=x) for all values of x |
| integral(f(x)*dx, a, b) | definite integral of f(x) wrt x |
| union(A[i], i==1, n) | union of A[i] for i equals 1 to n |
| intersect(A[i], i==1, n) | intersection of A[i] |
| lim(f(x), x %->% 0) | limit of f(x) as x tends to 0 |
| min(g(x), x > 0) | minimum of g(x) for x greater than 0 |
| inf(S) | infimum of S |
| sup(S) | supremum of S |
| x^y + z | normal operator precedence |
| x^(y + z) | visible grouping of operands |
| x^{y + z} | invisible grouping of operands |
| group("(",list(a, b),"]") | specify left and right delimiters |
| bgroup("(",atop(x,y),")") | use scalable delimiters |
| group(lceil, x, rceil) | special delimiters |
| group(lfloor, x, rfloor) | special delimiters |
以上就是R语言绘图时输出希腊字符上下标及数学公式实现方法的详细内容，更多关于R语言绘图输出希腊字符上下标及数学公式的资料请关注我们其它相关文章！
相关推荐
-
详解R语言中的表达式、数学公式、特殊符号
在R语言的绘图函数中,如果文本参数是合法的R语言表达式,那么这个表达式就被用Tex类似的规则进行文本格式化. y <- function(x) (exp(-(x^2)/2))/sqrt(2*pi) plot(y, -5, 5, main = expression(f(x) == frac(1,sqrt(2*pi))*e^(-frac(x^2,2))), lwd = 3, col = "blue") library(ggplot2) x <- seq(0, 2*pi, b
-
利用R语言绘制时间序列图的操作
数据 GDP.csv文件,存储1879~2019年河南省GDP数据 绘图 # 读取数据, 首先将excel 格式的转化为 csv 格式 再读取 h <- read.table(file = "C:/Users/PYY/Desktop/GDP.csv",sep = ",",header = T) # 转化为时间序列数据 GDP=ts(h$GDP,start = 1978,frequency = 1) # 绘图 plot(GDP) 补充:ts函数 ts() 函数:
-
R语言绘图布局实例讲解
在R语言中,par 函数可以设置图形边距,其中oma 参数设置outer margin, mar 参数设置margin, 这些边距有什么不同呢,通过box函数可以直观的看到 box 默认在当前图形绘制边框,第一个参数which = "plot", 所以在当前图形上绘制边框 which 的值除了plot 之外,还可以选择 figure, inner, outer 接下来分别用不同的值测试一下,为了区分,为不同的边框设置不同的颜色和类型,代码如下: attach(mtcars) plot(
-
R语言基础统计方法图文实例讲解
tidyr > tdata <- data.frame(names=rownames(tdata),tdata)行名作为第一列 > gather(tdata,key="Key",value="Value",cyl:disp,mpg)创key列和value列,cyl和disp放在一列中 -号减去不需要转换的列 > spread(gdata,key="Key",value="Value") 根据value将
-
R语言绘图时输出希腊字符上下标及数学公式实现方法
目录 希腊字母 上下标 paste 一个复杂的例子 进阶 数学公式 通常在我们写论文时,所需要的统计图是非常严谨的,里面的希腊字符与上下脚标都必须要严格书写.因此在使用R绘图时,如何在我们目标图中使用希腊字符.上标.下标及一些数学公式呢?在本博客中我们会进行详细的说明. 后面我们都将以一个最简单的绘图为例,只是将其标题进行修改. 希腊字母 使用希腊字符.上标.下标及数学公式,都需要利用一个函数:expression(),具体使用方式如下: plot(cars) title(main = expr
-
R语言绘图公式与变量对象混合拼接实现方法
当我们在R中进行绘图时,如果涉及到数学或统计公式的展现,可以使用函数:expression(),并且与 paste() 结合可以非常轻松的展现出自己想要展示的公式.详细的相关内容可参考: R进行绘图时输出希腊字符.上标.下标及数学公式 但这样做会遇到一个问题,在我们想批量产生大量含有不同变量值的标题时,如果遇到变量与公式的混合输出,就没有办法将变量里面的值进行输出了(使用 do.call() 等函数均不行). 举个栗子,若 m <- 10000,n <- 2000,我们如何让这两个变量直接显示
-
linux命令行下使用R语言绘图实例讲解
使用系统:centos 6.4 64bit 在R语言中可以使用png()等函数生成图片,例如: png("aa.png")可以生成图片. 但是如果你是通过shell远程连接到系统上,可能会碰到如下错误: > png("aa.png") 错误于.External2(C_X11, paste("png::", filename, sep = ""), g$width, : 无法打开PNG设备 此外: 警告信息: In
-
R语言绘图如何支持中文
不同系统的字体库目录: Linux 一般在 /usr/share/fonts 下,我们可以使用 fc-list 命令查看: # fc-list /usr/share/fonts/truetype/dejavu/DejaVuSerif-Bold.ttf: DejaVu Serif:style=Bold /usr/share/fonts/truetype/dejavu/DejaVuSansMono.ttf: DejaVu Sans Mono:style=Book /usr/share/fonts/t
-
R语言统计结果输出至本地文件的几种方法示例
1.sink() 在代码开始前加一行:sink("output.txt"),就会自动把结果全部输出到工作文件夹下的output.txt文本文档.这时在R控制台的输出窗口中是看不到输出结果的.代码结束时用sink()切换回来. 示例: sink("a.txt") x<-rnorm(100,0,1) mean(x) sink() 注:此处输出为mean(x). 2.stargazer() library(stargazer) #导入数据 mydata <-
-
R语言绘图数据可视化pie chart饼图
目录 Step 1. 绘图数据的准备 Step2. 绘图数据的读取 Step3.绘图所需package的调用 Step4. 饼图百分比标签准备 Step5.绘图 今天要给大家介绍的Pie chart(饼图),本来是不打算写这个的,因为用Excel画饼图实在是太方便了.本着能少动一下是一下的懒人原则,是不打算用R画的,再说,本小仙不是掌握了R作图大器ggplot2么,实在需要用的时候我就一句ggplot()+geom_pie()不就搞定了. 结果后来用Excel画饼图调整颜色.大小的时候着实有些崩
-
R语言绘图数据可视化pie chart饼图
目录 Step 1. 绘图数据的准备 Step2. 绘图数据的读取 Step3.绘图所需package的调用 Step4. 饼图百分比标签准备 Step5.绘图 今天要给大家介绍的Pie chart(饼图),本来是不打算写这个的,因为用Excel画饼图实在是太方便了.本着能少动一下是一下的懒人原则,是不打算用R画的,再说,本小仙不是掌握了R作图大器ggplot2么,实在需要用的时候我就一句ggplot()+geom_pie()不就搞定了. 结果后来用Excel画饼图调整颜色.大小的时候着实有些崩
-
R语言绘图学习教程VennDiagram绘制venn
目录 导读 一.模拟输入 二.venn基础图 三.个性化参数调整 四.保存 导读 使用VennDiagram函数包中的venn.diagram函数绘制三数据集venn图. 安装依赖包: # venn图 install.packages("VennDiagram") library(VennDiagram) 一.模拟输入 产生3个含200字符串的数据集 set1 <- paste(rep("word_" , 200) , sample(c(1:1000) , 2
-
R语言绘图数据可视化Ridgeline plot山脊图画法
目录 Step1. 绘图数据的准备 Step2. 绘图数据的读取 Step3. 绘图所需package的安装.调用 Step4. 绘图 调整透明度 更改顺序 更改线条形状 今天给大家介绍一下Ridgeline plot(山脊图)的画法. 作图数据如下: Step1. 绘图数据的准备 首先要把你想要绘图的数据调整成R语言可以识别的格式,建议大家在excel中保存成csv格式. Step2. 绘图数据的读取 data<-read.csv("your file path", heade