library(sf)
library(tools)
data(sim.data)
sim.join <- ssh.data.shp(object=sim.data[[1]], ssh.lyr=sim.data[[2]], ssh.id="X")
head(sim.join)
ssh.test(object=sim.join, y="Value", x=c("X"), test="factor")
Run the code above in your browser using DataLab