I see you used $r in this one not like the other ones, this could still use a lot of work but your slowly getting better.