Plotting lat/long coordinates into a Formal Class Raster Layer (factor) map with aea projection in R?

Question

I am quite new to working with spatial dataframes, and have what I thought was a relatively simple task: take a dataframe of 6 points, with x and y columns representing the