从函数输出中省略选定的值

Question

我需要从输出中隐藏一个函数的特定值，我找不到这样做的方法。

例如，如果我运行Shapiro-Wilk测试，我想隐藏W值并打印所有剩余的值。我知道你可以使用$打印一个特定的值，是否有类似的命令专门隐藏一个值？

实施例 正常输出

Shapiro-Wilk normality test

data:data1
W = 0.94771, p-value = 0.1349

我想要什么

Shapiro-Wilk normality test

data:data1
p-value = 0.1349

Answer 1

这应该有效：

test <- shapiro.test(rnorm(100, mean = 5, sd = 3))

test[2]

> $p.value
  [1] 0.3542693

# For your desired output:

cat(paste(test[3], '\n', "p-value =", test[2])

> Shapiro-Wilk normality test 
  p-value = 0.354269315676623