R - Decision Tree

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

Install R Package

Use the below command in R console to install the package. You also have to install the dependent packages if any.

1. install.packages("party")

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Decision CISI Tree CIS isi command package party

Syntax

The basic syntax for creating a decision tree in R is −

1. ctree(formula, data)

复制代码

the sample data.

1. # Load the party package. It will automatically load other dependent packages.
   
2. library(party)
   
3. 
   
4. # Print some records from data set readingSkills.
   
5. print(head(readingSkills))

复制代码

When we execute the above code, it produces the following result and chart −

1.   nativeSpeaker   age   shoeSize      score
   
2. 1           yes     5   24.83189   32.29385
   
3. 2           yes     6   25.95238   36.63105
   
4. 3            no    11   30.42170   49.60593
   
5. 4           yes     7   28.66450   40.28456
   
6. 5           yes    11   31.88207   55.46085
   
7. 6           yes    10   30.07843   52.83124
   
8. Loading required package: methods
   
9. Loading required package: grid
   
10. ...............................
    
11. ...............................

复制代码

Example

We will use the ctree() function to create the decision tree and see its graph.

1. # Load the party package. It will automatically load other dependent packages.
   
2. library(party)
   
3. 
   
4. # Create the input data frame.
   
5. input.dat <- readingSkills[c(1:105),]
   
6. 
   
7. # Give the chart file a name.
   
8. png(file = "decision_tree.png")
   
9. 
   
10. # Create the tree.
    
11.   output.tree <- ctree(
    
12.   nativeSpeaker ~ age + shoeSize + score,
    
13.   data = input.dat)
    
14. 
    
15. # Plot the tree.
    
16. plot(output.tree)
    
17. 
    
18. # Save the file.
    
19. dev.off()

复制代码

When we execute the above code, it produces the following result −

1. null device
   
2.           1
   
3. Loading required package: methods
   
4. Loading required package: grid
   
5. Loading required package: mvtnorm
   
6. Loading required package: modeltools
   
7. Loading required package: stats4
   
8. Loading required package: strucchange
   
9. Loading required package: zoo
   
10. 
    
11. Attaching package: ‘zoo’
    
12. 
    
13. The following objects are masked from ‘package:base’:
    
14. 
    
15.     as.Date, as.Date.numeric
    
16. 
    
17. Loading required package: sandwich

复制代码

From the decision tree shown above we can conclude that anyone whose readingSkills score is less than 38.3 and age is more than 6 is not a native Speaker.

Thank you for sharing