如何编写带有两个条件的R函数？抽奖号码生成问题求助

直接给你能正常运行的函数，同时解决你遇到的两个问题：

generate_lottery_numbers <- function() {
  # 从1-70里抽6个不重复的中奖号码，排序后更直观
  winning_numbers <- sort(sample(1:70, size = 6, replace = FALSE))
  # 从1-26里抽1个幸运数字
  lucky_number <- sample(1:26, size = 1)
  
  # 把结果整理成清晰的列表
  result <- list(
    "winning numbers" = winning_numbers,
    "lucky number" = lucky_number
  )
  
  # 打印结果，同时返回结果供后续使用
  print(result)
  return(invisible(result))
}

问题排查 #

1. 号码数量超过6个：你之前应该是把sample里的size参数设成了7，改成6就会得到刚好6个中奖号码。
2. 输出结构出错：用list分别存储中奖号码和幸运数字，能避免输出混乱，也符合你要的命名要求。

测试示例 #

调用函数：

generate_lottery_numbers()

输出示例：

$`winning numbers`
[1]  8 22 35 41 56 63

$`lucky number`
[1] 14

内容的提问来源于stack exchange，提问作者Veronica Rojas