Convert a columns into separate columns in wide format in R

I am trying to convert the "FRUITS" column into separate columns ("Apple" and "Banana") in wide format.

  Gender  AgeGroup              EAT           FRUITS 1 Female 30yr_39yr              Yes             Apple           2 Female 20yr_29yr              Yes             Apple              3 Female 70yr_80yr              Yes             Apple             4   Male 50yr_59yr              Yes             Banana              5 Female 40yr_49yr              Yes             Apple                  6 Female 70yr_80yr              Yes             Apple              

how to convert FRUITS column into:

  Gender AgeGroup       EAT  Apple      Banana 1 Female 30yr_39yr      Yes  TRUE      FALSE2 Female 20yr_29yr      Yes  TRUE      FALSE3 Female 70yr_80yr      Yes  TRUE      FALSE4   Male 50yr_59yr      Yes  FALSE     TRUE5 Female 40yr_49yr      Yes  TRUE      FALSE6 Female 70yr_80yr      Yes  TRUE      FALSE

Here is the dataframe I used:

data.frame(  Gender = c("Female", "Female", "Female", "Male", "Female", "Female"),  AgeGroup = c("30yr_39yr", "20yr_29yr", "70yr_80yr", "50yr_59yr", "40yr_49yr", "70yr_80yr"),  EAT = c("Yes", "Yes", "Yes", "Yes", "Yes", "Yes"),  FRUITS = c("Apple", "Apple", "Apple", "Banana", "Apple", "Apple"))