use perron function
add mathematica notebook