powered by
getInsertionPosition(parent, current)
data(lupin) r <- lupin$roots[[1]] r1 <- r$children[[1]] getInsertionPosition(r, r1)
Run the code above in your browser using DataLab