soc.csa encounter the Error on the example code of Taste dataset

[419kfj]

I am checking the taste data set example of "Taste dataset" on p52 of https://cran.r-project.org/web/packages/soc.ca/soc.ca.pdf

On the csa part, I encounter the error.

options(passive=NULL)
class.age     <- which(data_taste$Age == '55-64')
result.csca   <- soc.csa(result.mca, class.age, sup)

Error is as following.

colSums(sup) でエラー: 'x' は数値でなければなりません
(Sorry my system is Japanese, so the message is in Japanese. It meas Error at colSums(sup) 'x' have to be numeric. )

I know "sup" is defind at the top of this example script,
sup <- data.frame(data_taste$Gender, data_taste$Age, data_taste$Income)
.

So I expact to pass the "sup" directly and try as next .

result.csca   <- soc.csa(result.mca, class.age)

It generate the result. But I am not sure this result is reliable.

How can I do on this issue.

regards.

kazuo

[antongrau]

Dear Kazuo,

Thank you so much for your issue report.

I find the same error and have not yet discovered the source of the error - nor a solution. I suspect that I will remove the possibility to calculate supplementary categories within the soc.csa function. Instead you should use the function average.coord or better still supplementary.categories():

soc.ca::supplementary.categories(res.csa, sup[class.age,])

• Anton

[419kfj]

Anton,

Thank you for your reply.

But, I can't find "soc.ca::supplementary.categories" function in soc.ca 0.8.0.

[antongrau]

Dear Kazuo, Thank you so much for your issue report. I find the same error and have not yet discovered the source of the error - nor a solution. I suspect that I will remove the possibility to calculate supplementary categories within the soc.csa function. Instead you should use the function average.coord or better still supplementary.categories(): soc.ca::supplementary.categories(res.csa, sup[class.age,]) - Anton

…

On Sat, 30 Apr 2022 at 02:43, kazuo fujimoto ***@***.***> wrote: I am checking the taste data set example of "Taste dataset" on p52 of https://cran.r-project.org/web/packages/soc.ca/soc.ca.pdf On the csa part, I encounter the error. options(passive=NULL) class.age <- which(data_taste$Age == '55-64') result.csca <- soc.csa(result.mca, class.age, sup) Error is as following. colSums(sup) でエラー: 'x' は数値でなければなりません (Sorry my system is Japanese, so the message is in Japanese. It meas Error at colSums(sup) 'x' have to be numeric. ) I know "sup" is defind at the top of this example script, sup <- data.frame(data_taste$Gender, data_taste$Age, data_taste$Income) . So I expact to pass the "sup" directly and try as next . result.csca <- soc.csa(result.mca, class.age) It generate the result. But I am not sure this result is reliable. How can I do on this issue. regards. kazuo — Reply to this email directly, view it on GitHub <#105>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/AAHFLWEWZX4PNACAN63XNI3VHR62VANCNFSM5UXSDRBQ> . You are receiving this because you are subscribed to this thread.Message ID: ***@***.***>

[pablillocea]

Hi both!

Almost exactly two years later and in version 0.8.0, I still encounter the same issue. Furthermore, the function supplementary.categories does not exist within the package.

Are there plans to solve this error? Is there any way one can contribute?