R语言 估计 u = 10, 估计检验第一类错误和检验的工效

假设 X 独立来自正态 分布 ， 假设检验 H0 u = 10, 估计检验第一类错误和检验的工效，写出R语言代码

假设检验的第一类错误率是指当原假设成立时，错误地拒绝原假设的概率。在正态分布下，可以使用标准正态分布的累积分布函数（CDF）计算检验的第一类错误率。

假设检验的功效是指当原假设不成立时，正确地拒绝原假设的概率。在正态分布下，可以使用样本均值和样本标准差计算统计量的分布，从而计算检验的功效。

以下是在 R 语言中执行假设检验的示例代码：

# 生成样本数据
set.seed(123)
n <- 100
x <- rnorm(n, mean = 9.8,