Before revision:  We have implemented the method in the R package netgwas which is freely available at URL
After revision:  We have implemented the method in the R package netgwas .