R语言入门——如何把字符串转化为可执行的命令？_r 字符串转换为命令

引言

我们都知道计算机的可以接受命令进行一些枯燥的运算。但是这些执行的命令都是人事先根据自己的目的事先构建好的。那么问题来了，计算机语言可不可以根据某种需求自己设计语言进而执行得到达到目的么。当然理论上是可以的，但是仔细想想让计算机根据某种特定的需求进行编程，需要让字符串变成可以执行的命令。这样我们才能使计算机按着某种逻辑进行设计语句了。当然本文不介绍如何实现计算机自编程。单纯介绍两个核心函数：eval和parse。

1、parse

功能：字符->表达式
函数参数：

> parse
function (file = "", n = NULL, text = NULL, prompt = "?", 
    keep.source = getOption("keep.source"), srcfile = NULL, 
    encoding = "unknown") 
1
2
3
4

通过text参数，可以把字符串变为表达式。
如：

> parse(text = "rep(1:2, 3)")
expression(rep(1:2, 3))
> parse(text = "x <- data.frame(a = 1:5, b = 6:10)")
expression(x <- data.frame(a = 1:5, b = 6:10))
1
2
3
4

我们通过函数parse把字符转为表达式的形式。

2、eval

功能：执行表达式
函数体和环境。这是一个类函数，核心的函数主体我们看不到。

> eval
function (expr, envir = parent.frame(), enclos = if (is.list(envir) || 
    is.pairlist(envir)) parent.frame() else baseenv()) 
.Internal(eval(expr, envir, enclos))
<bytecode: 0x00000000123734c8>
<environment: namespace:base>
1
2
3
4
5
6

这个函数可以把表达式在R环境中执行，延续1中的例子我们有：

> eval(parse(text = "rep(1:2, 3)"))
[1] 1 2 1 2 1 2
> eval(parse(text = "x <- data.frame(a = 1:5, b = 6:10)"))
> x
  a  b
1 1  6
2 2  7
3 3  8
4 4  9
5 5 10

1
2
3
4
5
6
7
8
9
10
11

总结

最后希望可以帮助大家学习R语言。水平有限发现错误还望及时评论区指正，您的意见和批评是我不断前进的动力。