R语言计算h(x, n)=1+x+x^2+……+x^n 的程序

以下是用R语言编写的计算h(x, n)的程序：

compute_h <- function(x, n) {
  result <- 0
  for (i in 0:n) {
    result <- result + x^i
  }
  return(result)
}

# 测试示例
x <- 2
n <- 5
h_value <- compute_h(x, n)
cat('h(', x, ',', n, ') =', h_value)

在上面的程序中，compute_h函数接受两个参数x和n，使用循环计算h(x, n)的值。程序中先初始化result变量为0，然后通过循环计算x的幂并累加到result中。最后返回result作为h(x, n)的计算结果。

您可以将x和n设置为您希望计算的具体值，然后运行程序，它将输出h(x, n)的结果。在示例中，我们设置x为2，n为5进行测试，您可以根据需要修改这些值。