In R how can I collapse rows to compute a mean for only specific columns?

Question

just wondering how to do this simply: I have a table with the first column being participant number, then the second column being the time period of day (there are 3 periods