java 分类回归树的构造过程_如何从回归树中识别每个叶子中的序列?

目前,此信息无法从树中轻松恢复 . 以下函数使用树的完整条件而不是节点标签返回拟合值的向量 .

dtlabels

if (!inherits(tree, "disstree")) {

stop("tree should be a disstree object")

}

split_s

formd

return(format(x, digits =getOption("digits")-2))

}

str_split

vname

if (!is.null(sp$breaks)) {

str_split[1]

str_split[2] ", formd(sp$breaks))

}

else {

str_split[1]

str_split[2]

}

if(!is.null(sp$naGroup)){

str_split[sp$naGroup]

}

return(paste(vname, str_split))

}

labelEnv

labelEnv$label

addLabel

id1

id2

labelEnv$label[[id2]]

}

nodeRec

if(!is.null(node$split)){

spl

addLabel(node, node$kids[[1]], spl[1])

addLabel(node, node$kids[[2]], spl[2])

nodeRec(node$kids[[1]])

nodeRec(node$kids[[2]])

}

}

nodeRec(tree$root)

l2

for(nn in names(labelEnv$label)){

l2[[nn]]

}

l3

names(l3)

return(factor(factor(tree$fitted[, 1], levels=as.numeric(names(l3)), labels=l3)))

}

然后可以按以下方式使用该功能 .

fitted

print(table(fitted))

希望这可以帮助!

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值