add new wiggle tool based on @nickloman's wiggle R script.