Как мы можем решить ошибку?Ошибка в bca (f = ...: не удалось найти функцию "bca"

Question

Я использую пакет "dst" (стр. 10,11: комбинация двух массовых функций), когда я писал небольшой пример, он работает правильно. Но я пишу большие функции, возникает эта ошибка:

Error in bca(f = matrix(c(1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  : 
  could not find function "bca"

моя функция: это идет не так:

library("dst")

x43 <- bca(f=matrix(c(1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
,nrow=23, byrow = TRUE),
m=c(0.02927918,0.03578567,0.01254822,0.04391877,0.06831808,0.06831808,0.05437561,
0.06831808,0.11711670,0.03578566,0.04387215,0.02927918,0.03575976,0.06839579,
0.02927918,0.06839579,0.02927918,0.01585178,0.02396417,0.01953500,0.04405864,0.02927918,0.02927918),
cnames=c("i1", "i2", "i3", "i4", "i5", "i6", "i7", "i8", "i9", "i10", "i11", "i12", "i13", "i14",
"i15", "i16", "i17", "i18", "i19", "i20", "i21", "i22", "i23"),
infovarnames = "x", varnb = 1)

Ошибка:

Error in bca(f = matrix(c(1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, : could not find function "bca"

маленький пример, который работает правильно:

require("dst")
# Loading required package: dst

x25 <- bca(f=matrix(c(1,0,1,1),nrow=2, byrow = TRUE),
m=c(0.8,0.2), cnames=c("i1", "i2"),
infovarnames = "x", varnb = 1)

x26 <- bca(f=matrix(c(0,1,1,1),nrow=2, byrow = TRUE),

m=c(0.7,0.3), cnames=c("i1", "i2"),
infovarnames = "x", varnb = 1)

print ("combination of x25 and x26")

# [1] "combination of x25 and x26"
x25x26 <- dsrwon(x25,x26)
nzdsr(x25x26)

Answer 1

@ user2554330 правильно, пожалуйста, проверьте ваши данные еще раз. В функции bca значения в параметре m должны быть добавлены к единице, но в вашем примере они не:

m=c(0.02927918,0.03578567,0.01254822,0.04391877,0.06831808,0.06831808,0.05437561, 0.06831808,0.11711670,0.03578566,0.04387215,0.02927918,0.03575976,0.06839579,   0.02927918,0.06839579,0.02927918,0.01585178,0.02396417,0.01953500,0.04405864,0.02927918,0.02927918)
sum(m)
[1] 0.999993