Displaying 1 result from an estimated 1 matches for "satisf1".
Did you mean:
satisfy
2011 Mar 23
0
Rulefit with R and missing values
.../Rulefit"
source("C:/Rulefit/rulefit.r")
install.packages("akima", lib=rfhome)
library(akima, lib.loc=rfhome)
save.image("C:/Rulefit/init_rulefit.RData")
setwd("C:/Rulefit")
load("C:/Rulefit/init_rulefit.RData")
library(akima, lib.loc=rfhome)
satisf1<-read.table("rulefit satisf
preop.txt",header=TRUE,dec=".",na.strings="?")
tt<-dim(satisf1)
ref<- array(1, dim=c(tt[1],tt[2]-1))
resp<- array(1, dim=c(tt[1],1))
for ( i in 1 : tt[1]) {
resp[i,1]=satisf1[i,tt[2]]
for (j in 1 : (tt[2]-1)) {
ref[i,j]=s...