R语言报错无pickSoftThreshold函数

问题遇到的现象和发生背景

跑WGCNA时,出现error

问题相关代码,请勿粘贴截图

sft = pickSoftThreshold(five, powerVector = powers, verbose = 5)

运行结果及报错内容

Error in pickSoftThreshold(five, powerVector = powers, verbose = 5) :
could not find function "pickSoftThreshold"

我的解答思路和尝试过的方法

载入“SoftThreshold”包,但无效
#######想要解决这个error