# NOT RUN {
# Load data:
data(alien)
# Logtransform data
alien.data$logMass <- log(alien.data$adultMass)
# Run sensitivity analysis:
influ <- influ_physig("logMass", data = alien.data, phy = alien.phy[[1]])
# To check summary results:
summary(influ)
# Most influential speciesL
influ$influential.species
# Visual diagnostics
sensi_plot(influ)
# You can specify which graph to print:
sensi_plot(influ, graphs = 1)
sensi_plot(influ, graphs = 2)
# }
Run the code above in your browser using DataLab