All you did was include the dput command in your example. We need the output of dput, not the command itself.
On July 23, 2020 2:43:31 PM PDT, Neha gupta <neha.bologn...@gmail.com> wrote: >David, I understand that the file will not be in your directory but I >have >provided the data using dput? Didn't I? Previously members of this >group >have used dput to provide the detail about their data. Seriously, I >have no >idea how else I can provide a reproducible example. > > > ><https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail&utm_term=icon> >Virus-free. >www.avast.com ><https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail&utm_term=link> ><#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2> > >On Thu, Jul 23, 2020 at 10:47 PM David Winsemius ><dwinsem...@comcast.net> >wrote: > >> >> On 7/23/20 9:34 AM, Neha gupta wrote: >> >> >> Hello David, file not found should be the path problem I guess. I >just >> forgot the pROC library, which I included here. These are all the >libraries >> I am using. >> >> library(caret) >> library(farff) >> library(DMwR) >> library(pROC) >> library(pls) >> >> setwd("C:/Users/PC/Documents") >> d=readARFF("bughunter.arff") >> >> >> I suppose *you* might have such a file in that directory, but do you >> assume that *we* will???? >> >> A reproducible example will allow others to run your code. Seems >fairly >> clear that we are not there yet. >> >> -- >> >> David. >> >> dput( head( d, 30 ) ) >> >> index <- createDataPartition(d$`Bug class`, p = .70,list = FALSE) >> >> tr <- d[index, ] >> >> ts <- d[-index, ] >> >> boot3 <- trainControl(method = "repeatedcv", number=10, >> repeats=10,classProbs = TRUE,verboseIter = FALSE, >> >> summaryFunction = twoClassSummary, sampling = "rose") >> >> set.seed(30218) >> >> ct <- train(`Bug class` ~ ., data = tr, method = "pls", metric = >"AUC", preProc >> = c("center", "scale", "nzv"), trControl = boot3) >> >> getTrainPerf(ct) >> >> >> >> ><https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail&utm_term=icon> >Virus-free. >> www.avast.com >> ><https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail&utm_term=link> >> >> On Thu, Jul 23, 2020 at 4:01 PM Neha gupta <neha.bologn...@gmail.com> >> wrote: >> >>> >>> Hello David, thanks for your reply. I have added the information. >>> >>> library(caret) >>> library(farff) >>> library(DMwR) >>> >>> d=readARFF("bughunter.arff") >>> dput( head( d, 30 ) ) >>> >>> index <- createDataPartition(d$`Bug class`, p = .70,list = FALSE) >>> >>> tr <- d[index, ] >>> >>> ts <- d[-index, ] >>> >>> boot3 <- trainControl(method = "repeatedcv", number=10, >>> repeats=10,classProbs = TRUE,verboseIter = FALSE, >>> >>> summaryFunction = twoClassSummary, sampling = "rose") >>> >>> set.seed(30218) >>> >>> ct <- train(`Bug class` ~ ., data = tr, method = "pls", metric = >"AUC", preProc >>> = c("center", "scale", "nzv"), trControl = boot3) >>> >>> getTrainPerf(ct) >>> >>> On Thu, Jul 23, 2020 at 1:08 AM David Winsemius ><dwinsem...@comcast.net> >>> wrote: >>> >>>> >>>> On 7/22/20 3:43 PM, Neha gupta wrote: >>>> > Hello, >>>> > >>>> > >>>> > I get the following error when I use the ROSE class balancing >method >>>> but >>>> > when I use other methods like SMOTE, up, down, I do not get any >error >>>> > message. >>>> > >>>> > >>>> > Something is wrong; all the ROC metric values are missing: >>>> > >>>> > ROC Sens Spec >>>> > >>>> > Min. : NA Min. : NA Min. : NA >>>> > >>>> > 1st Qu.: NA 1st Qu.: NA 1st Qu.: NA >>>> > >>>> > Median : NA Median : NA Median : NA >>>> > >>>> > Mean :NaN Mean :NaN Mean :NaN >>>> > >>>> > 3rd Qu.: NA 3rd Qu.: NA 3rd Qu.: NA >>>> > >>>> > Max. : NA Max. : NA Max. : NA >>>> > >>>> > >>>> > >>>> > library(DMwR) >>>> > >>>> > d=readARFF("bughunter.arff") >>>> >>>> After installing that package and loading pkg:DMwR I get: >>>> >>>> >>>> Error in readARFF("bughunter.arff") : could not find function >"readARFF" >>>> >>>> >>>> Since you also posted in HTML, I suggest you read the Posting >Guide, >>>> restart and R session and post a reproducible example that loads >all >>>> needed packages and data. >>>> >>>> -- >>>> >>>> David. >>>> >>>> > >>>> > index <- createDataPartition(d$`Bug class`, p = .70,list = FALSE) >>>> > >>>> > tr <- d[index, ] >>>> > >>>> > ts <- d[-index, ] >>>> > >>>> > boot3 <- trainControl(method = "repeatedcv", number=10, >>>> > repeats=10,classProbs = TRUE,verboseIter = FALSE, >>>> > >>>> > summaryFunction = twoClassSummary, sampling = "rose") >>>> > >>>> > set.seed(30218) >>>> > >>>> > ct <- train(`Bug class` ~ ., data = tr, >>>> > >>>> > method = "pls", >>>> > >>>> > metric = "AUC", >>>> > >>>> > preProc = c("center", "scale", "nzv"), >>>> > >>>> > trControl = boot3) >>>> > >>>> > getTrainPerf(ct) >>>> > >>>> > [[alternative HTML version deleted]] >>>> > >>>> > ______________________________________________ >>>> > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >>>> > https://stat.ethz.ch/mailman/listinfo/r-help >>>> > PLEASE do read the posting guide >>>> http://www.R-project.org/posting-guide.html >>>> > and provide commented, minimal, self-contained, reproducible >code. >>>> >>> > > [[alternative HTML version deleted]] > >______________________________________________ >R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >https://stat.ethz.ch/mailman/listinfo/r-help >PLEASE do read the posting guide >http://www.R-project.org/posting-guide.html >and provide commented, minimal, self-contained, reproducible code. -- Sent from my phone. Please excuse my brevity. ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
