怎么用R語言在圖中繪制漂亮的數學公式或拉丁字母

本文小編為大家詳細介紹“怎么用R語言在圖中繪制漂亮的數學公式或拉丁字母”，內容詳細，步驟清晰，細節(jié)處理妥當，希望這篇“怎么用R語言在圖中繪制漂亮的數學公式或拉丁字母”文章能幫助大家解決疑惑，下面跟著小編的思路慢慢深入，一起來學習新知識吧。

plotmath 進行查看，主要是一些數學公式和符號的表示方法。下面有一段代碼是繪制公式的代碼，并把公式和文字組合在一起：

y <- function(x) log(x) + sqrt(x) + x^(1/3) 
plot(y, 1, 1000, main = expression(paste("This is a formula ",y == log(x) + sqrt(x) + sqrt(x, 3))), 
     lwd = 3,  
     col = "blue")

要想組合出自己想要的復雜公式，那么就得知道，公式表示方法和顯示結果的對應關系。這里有段代碼可以產生對應關系，需要輸入文件：math.txt

ex <- parse("math.txt")
labs <- readLines("math.txt")
n <- length(ex)par(mar = rep(0.1, 4), cex = 0.8)plot.new()plot.window(c(0, 8), c(0, n/4))
y <- seq(n/4, by = -1, length = n/4)
x <- seq(0.1, by = 2, length = 4)
xy <- expand.grid(x, y)text(xy, labs, adj = c(0, 0.5))
xy <- expand.grid(x + 1.3, y)text(xy, ex, adj = c(0, 0.5), col = "blue")box(lwd = 2)abline(v = seq(1.3, by = 2, length = 4), lty = 3)abline(v = seq(2, by = 2, length = 3), lwd = 1.5)

如果函數名（包括運算符）有對應的Tex格式化規(guī)則，函數名和參數都按規(guī)則進行圖形繪制；如果沒有，就當成是R語言普通函數：

示例代碼：

ex <- expression(sqrt(x), x + y, x^2, x %in% A, x <= y, mean(x, y, z), x | y, 
    x & y)
n <- length(ex)par(mar = rep(0.1, 4), cex = 1.5)
col <- c("red", "blue")plot.new()plot.window(c(0, n), c(0, 1))for (i in 1:n) text(i - 0.5, 0.5, ex[i], col = col[i%%2 + 1])

上面例子中前5種運算函數都是有對應數學符號的，所以它出的圖（符號和順序）與數學習慣一致，后三種運算函數沒有對應數學符號，所以用普通函數方式（函數名在前，參數在括號內用逗號分隔）出圖。

讀到這里，這篇“怎么用R語言在圖中繪制漂亮的數學公式或拉丁字母”文章已經介紹完畢，想要掌握這篇文章的知識點還需要大家自己動手實踐使用過才能領會，如果想了解更多相關內容的文章，歡迎關注億速云行業(yè)資訊頻道。