R Assign Value To Column Based On Another Column, One is if you have .