在用RStudio编写脚本时，如何为希腊字母赋值？

Question

我想使用<-给希腊字母或其他符号赋值，就像我可以给字母'A‘赋值一样。是否存在将符号合并到R脚本中的方法？

我正在用RStudio编写脚本。

Answer 1

可能的，但也许比使用alpha，beta，gamma更烦人。

greek <- c("α", "β", "γ", "δ", "ε", "ζ", "η", "θ", "ι", "κ", "λ", "μ", "ν", "ξ", "ο", "π", "ρ", "σ", "τ", "υ", "φ", "χ", "ψ", "ω")

for (g in greek) assign(g, toupper(g))

for (g in greek) print(paste(g, get(g), sep=":"))
[1] "α:Α"
[1] "β:Β"
[1] "γ:Γ"
[1] "δ:Δ"
[1] "ε:Ε"
[1] "ζ:Ζ"
[1] "η:Η"
[1] "θ:Θ"
[1] "ι:Ι"
[1] "κ:Κ"
[1] "λ:Λ"
[1] "μ:Μ"
[1] "ν:Ν"
[1] "ξ:Ξ"
[1] "ο:Ο"
[1] "π:Π"
[1] "ρ:Ρ"
[1] "σ:Σ"
[1] "τ:Τ"
[1] "υ:Υ"
[1] "φ:Φ"
[1] "χ:Χ"
[1] "ψ:Ψ"
[1] "ω:Ω"

GREEK <- toupper(greek)