#Load the iris dataset
data(iris)
#Set up the predictors object
predictors=iris[,c(1:4)]
colnames(predictors)<-colnames(iris[1:4])
#Execute the main pRF function
p.test<-pRF(response=factor(iris$Species),
predictors=iris[,c(1:4)],n.perms=20,mtry=3,
type="classification",alpha=0.05)
#Plot
sigplot(pRF.list=p.test,threshold=0.1)
Run the code above in your browser using DataLab