地理探测器R出现error in gdm问题

library("GD")
testdata <- read.csv("F:/R/SHUJU.csv", header = TRUE, sep = ",")
discmethod <- c("equal","natural","quantile","geometric","sd")
discitv <- c(3:7)
continuous_variable <- colnames(testdata)[c(2:3,5:13)]
testgdm <- gdm(Y2 ~ ., continuous_variable = continuous_variable, 
               data = testdata, discmethod = discmethod, discitv = discitv)
testgdm

Error in gdm(Y2 ~ ., continuous_variable = continuous_variable, data = testdata,  : 
  unused arguments (continuous_variable = continuous_variable, discmethod = discmethod, discitv = discitv)

请帮看一下这个代码哪里出错了，万分感谢.

你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答


本次提问扣除的有问必答次数，将会以问答VIP体验卡（1次有问必答机会、商城购买实体图书享受95折优惠）的形式为您补发到账户。


因为有问必答VIP体验卡有效期仅有1天，您在需要使用的时候【私信】联系我，我会为您补发。