# R program to check if
# an object is an expression

# Creating an object
x <- "sin(pi / 2)"

Pada bagian ini, kita membuat sebuah objek x yang merupakan sebuah string yang berisi ekspresi matematika, yaitu “sin(pi / 2)”. Objek ini akan digunakan untuk melakukan evaluasi dan memeriksa apakah itu adalah sebuah ekspresi.

# Printing value of the object
eval(x)
## [1] "sin(pi / 2)"

Pada bagian ini, kita menggunakan fungsi eval() untuk mengevaluasi ekspresi yang terdapat dalam objek x. Fungsi eval() digunakan untuk mengevaluasi ekspresi sebagai kode R yang valid. Dalam contoh ini, ekspresi “sin(pi / 2)” dievaluasi dan hasilnya dicetak ke layar. Hasil evaluasi adalah nilai yang dihasilkan dari ekspresi tersebut.

# Calling is.expression() function
is.expression(x)
## [1] FALSE

Pada bagian ini, kita menggunakan fungsi is.expression() untuk memeriksa apakah objek x adalah sebuah ekspresi atau bukan. Fungsi is.expression() mengembalikan nilai TRUE jika objek yang diberikan adalah sebuah ekspresi, dan FALSE jika bukan ekspresi. Dalam contoh ini, kita memanggil fungsi is.expression(x) dan hasilnya dicetak ke layar.

Dalam keseluruhan program ini saya membuat sebuah objek x yang berisi sebuah ekspresi matematika, kemudian kita melakukan evaluasi terhadap ekspresi tersebut menggunakan fungsi eval() dan memeriksa apakah itu adalah sebuah ekspresi menggunakan fungsi is.expression(). Output dari setiap evaluasi dan pengecekan kemudian dicetak ke layar.