Update Analysis of apple trees.R

Edit to comments