[R] Help in jointprior(kslf.nw)

[Jiblal Upadhya]

Dear All,

I tried to implement following code, but its giving error as
"Error in array(1:TD, dim = Dim) : 'dims' cannot be of length 0"

Code for ksl dataset in deal package
kslfs <- ksl[c(1:300),c(1,2,4,5,6,7,8)]
head(kslfs)
kslfs[,c(1:7)] <- lapply(kslfs[,c(1:7)], as.factor)
indx <- sapply(kslfs, is.factor)
kslfs[indx] <- lapply(kslfs[indx], function(x) as.numeric(as.character(x)))
kslfs.nw <- network(kslfs)
kslfs.prior <- jointprior(kslfs.nw)

I look on the stack overflow and its saying it doesn't run for only
continuous variables. Anyone has updated information to correct this.

Any help will be highly appreciated.
Thanks,

-Jiblal

	[[alternative HTML version deleted]]