Dize olarak verilen ifadeyi değerlendirme

R, eval()örneğin bir dize tarafından sağlanan hesaplamaları gerçekleştirmek için işlevini kullanıp kullanamayacağını merak ediyorum .

Bu yaygın bir durumdur:

eval("5+5")

Ancak, 10 yerine:

[1] "5+5"

Herhangi bir çözüm?

eval()Fonksiyonu bir ifade olarak değerlendirilir, ancak "5+5"bir dize değil, bir ifadesidir. Dizeyi bir ifadeye dönüştürmek için parse()ile kullanın text=<string>:

> eval(parse(text="5+5"))
[1] 10
> class("5+5")
[1] "character"
> class(parse(text="5+5"))
[1] "expression"

Arayan eval()Birçok davranışları çağırır, bazıları hemen açık değildir:

> class(eval(parse(text="5+5")))
[1] "numeric"
> class(eval(parse(text="gray")))
[1] "function"
> class(eval(parse(text="blue")))
Error in eval(expr, envir, enclos) : object 'blue' not found

Ayrıca bakınız tryCatch .

parse()İşlevi karakterleri ifadeye dönüştürmek için kullanabilirsiniz . Ayrıştırma varsayılan olarak bir dosya beklediğinden, girişin metin olduğunu belirtmeniz gerekir:

eval(parse(text="5+5"))

Üzgünüm ama neden çok fazla insanın bir ipin değerlendirilebilecek bir şey olduğunu düşündüğünü anlamıyorum. Gerçekten de zihniyetinizi değiştirmelisiniz. Bir taraftaki dizeler ile diğer taraftaki ifadeler, çağrılar, değerlendirme arasındaki tüm bağlantıları unutun.

(Muhtemelen) sadece bağlantı gerçekleşir parse(text = ....)ve tüm iyi R programcıları, bunun ifadeleri (veya çağrıları) oluşturmak için nadiren etkili veya güvenli bir araç olduğunu bilmelidir. Aksine daha öğrenmek substitute(), quote()ve muhtemelen kullanarak gücünü do.call(substitute, ......).

fortunes::fortune("answer is parse")
# If the answer is parse() you should usually rethink the question.
#    -- Thomas Lumley
#       R-help (February 2005)

Aralık.2017: Tamam, işte bir örnek (yorumlarda güzel bir biçimlendirme yok):

q5 <- quote(5+5)
str(q5)
# language 5 + 5

e5 <- expression(5+5)
str(e5)
# expression(5 + 5)

Daha öğreneceksiniz deneyimli olsun eğer o q5bir olduğunu "call", oysa e5bir olduğunu "expression"bile ve e5[[1]]aynıdır q5:

identical(q5, e5[[1]])
# [1] TRUE

Alternatif olarak, kullanabileceğiniz evalsbenim gelen panderyakalama çıktı ve tüm uyarıları, hata ve ham sonuçların yanı sıra diğer iletilere paketin:

> pander::evals("5+5")
[[1]]
$src
[1] "5 + 5"

$result
[1] 10

$output
[1] "[1] 10"

$type
[1] "numeric"

$msg
$msg$messages
NULL

$msg$warnings
NULL

$msg$errors
NULL


$stdout
NULL

attr(,"class")
[1] "evals"

Günümüzde paketin lazy_evalfonksiyonunu da kullanabilirsiniz lazyeval.

> lazyeval::lazy_eval("5+5")
[1] 10

Benzer şekilde rlang:

eval(parse_expr("5+5"))