plot ipstrength using R