R 程序：制作一个简单的计算器

在这个示例中，您将学习如何创建一个简单的计算器，它可以执行用户输入的两个数字的加法、减法、乘法和除法运算。

要理解这个示例，您应该掌握以下R编程的知识点：

• R函数
• R switch()函数
• R从函数返回值

示例：R中的简单计算器

# 创建一个简单的计算器，可以使用函数进行加法、减法、乘法和除法运算

add <- function(x, y) {
  return(x + y)
}

subtract <- function(x, y) {
  return(x - y)
}

multiply <- function(x, y) {
  return(x * y)
}

divide <- function(x, y) {
  return(x / y)
}

# 提示用户选择操作
cat("选择操作：\n")
cat("1.相加\n")
cat("2.相减\n")
cat("3.相乘\n")
cat("4.相除\n")

# 读取用户选择
choice <- as.integer(readline(prompt = "请输入选择[1/2/3/4]: "))

# 读取用户输入的两个数字
num1 <- as.numeric(readline(prompt = "请输入第一个数字: "))
num2 <- as.numeric(readline(prompt = "请输入第二个数字: "))

# 使用switch语句执行用户选择的操作
result <- switch(
  choice,
  "1" = add(num1, num2),
  "2" = subtract(num1, num2),
  "3" = multiply(num1, num2),
  "4" = divide(num1, num2)
)

# 显示结果
cat("结果: ", result, "\n")

输出

选择操作：
1.相加
2.相减
3.相乘
4.相除
请输入选择[1/2/3/4]: 4
请输入第一个数字: 20
请输入第二个数字: 4
结果:  5

在这个程序中，我们要求用户选择所需的操作。选项1、2、3和4都是有效的。

从用户获取两个数字，然后使用switch分支来执行特定的函数。

用户定义的函数add()、subtract()、multiply()和divide()分别执行相应的操作。