How do I put this in R studio form?

# Load the data

sales $=$ pd$.$read$\_$csv$("$your$\_$sales$\_$data.csv$")$

# Group the data by zipcode and product, summing the quantity

grouped$\_$data $=$ sales.groupby$([\text{'}$zipcode$\text{'},$ 'product'$])[\text{'}$quantity$\text{'}].$sum$().$reset$\_$index$()$

# Find the most purchased product for each zipcode

most$\_$purchased $=$ grouped$\_$data.loc$[$grouped$\_$data.groupby$(\text{'}$zipcode$\text{'})[\text{'}$quantity$\text{'}].$idxmax$()]$

print$($most$\_$purchased$)$