How to compute error rate from a decision tree?

Question

Does anyone know how to calculate the error rate for a decision tree with R? I am using the rpart() function.