Added medusaVolcano.R. Needs testing