R语言程序：（1），建一个数据框A1，包括学生学号、性别、年龄、期末考试成绩几列。随机生成100行，包括一些缺失值

可以使用以下代码生成数据框A1：

# 设置随机数种子，保证结果可重复
set.seed(123)

# 生成随机数据
ID <- sample(1:100, 100, replace = TRUE)
gender <- sample(c("男", "女"), 100, replace = TRUE)
age <- sample(18:25, 100, replace = TRUE)
score <- sample(c(60:100, NA), 100, replace = TRUE)

# 创建数据框
A1 <- data.frame(ID, gender, age, score)

在上述代码中，使用了`sample()`函数生成随机数据，并使用`replace = TRUE`参数允许有重复值出现。其中学生学号列使用了`1`到`100`之间的整数表示。成绩列使用了`NA`表示缺失值。最终将四列数据合并为一个数据框`A1`。