r - Rで複数のダミーを要約する

Question

10 人に好きな果物を聞いたとします。複数の回答が可能です。結果は次のように R に入力されます。

set.seed(234078)
df <- data.frame(q1.banana = sample(0:1, 10, replace = TRUE),
                 q1.apple  = sample(0:1, 10, replace = TRUE),
                 q1.melon  = sample(0:1, 10, replace = TRUE))

となることによって

> df
   q1.banana q1.apple q1.melon
1          0        0        1
2          0        1        1
3          1        1        0
4          1        0        0
5          0        1        1
6          0        0        0
7          1        0        0
8          0        0        0
9          0        1        1
10         0        0        1

次のような表に情報を要約するにはどうすればよいですか?

q1.*    Freq
banana     3
apple      4
melon      5

検索したところ、を使用するなどのアイデアがいくつか見つかりましたinteraction(q1.banana, q1.apple, q1.melon)が、それは別の種類の出力を提供します。さらに、私の実際のケースには数十のダミーが予想され、すべてを書きたくないので、回答にワイルドカードが含まれていると本当にありがたいです。