The partykit
package give a nice representation of decision trees. The only problem I have with it is when labels are long and then they are overlapping. Is it possible to move those labels to prevent it (see the blue arrows on the picture below)?
library("rpart")
library("partykit")
rp <- rpart(Kyphosis ~ Age + Number + Start, data = kyphosis)
party_rp <- as.party(rp)
plot(party_rp)