RでユニークユーザーIDの個数を数えて、個数の多いものだけ表示したい

Question

前提

初心者です。
Rを用いて、あるポイントサイトのユーザー分析を行なっています。

実現したいこと

ヘビーユーザーとライトユーザーの違いを調べるために、元となるデータベース（列：ユーザーID、購入日時）から購入回数の多いユーザーのみのデータフレームを作成し（summariseで同じユーザーIDの個数を数えて、filterで個数の多いor少ないユーザーのみをリストアップ）、それらのデータをプロットして購入日に差があるのかないのかを調査したいです。

発生している問題・エラーメッセージ

エラーではなく、自分の狙った形にならないことが問題です。

困っていること
・summariseでユーザーIDの個数を数えると、ユーザーIDごとに行が一つに収まり、各購入日時を調べられない

該当のソースコード

toku_i <-
  toku_test %>%
  arrange(katene_id) %>%  #行の整理
  group_by(katene_id) %>%  #整理したリストをグループ化 
  summarise(kaisu = n(),day = max(time),n_distinct(time)) %>%
  filter(kaisu < 10) %>% #カウントして出来た列nの10以下の行を除外
  ungroup()　#グループ化リセット
View(toku_i)

試したこと

summariseで同じユーザーIDの個数を数えて、filterで個数の多いor少ないユーザーのみをリストアップ

補足情報（FW/ツールのバージョンなど）

あまり、具体的な質問になっておらず回答しづらいかと思います。すみません。
よろしくお願いします。

Comments

[NamerikawaR]

summarieの中の day = max(time)
の意図が掴めていないので当てずっぽうになりますが、そのまま
purchase = time
にした場合はどうでしょうか。

[meg_]

画像を添付しようとしているようですが、表示されていませんよ。

[monsi]

@NamerikawaRさん
ご回答いただきありがとうございます。
day = max(time)はまとめたIDリストの一番新しい日付を出力しようとしてました。
日付の部分は変更する必要がなかったかもしれないです。

[monsi]

@megさん
ご指摘ありがとうございます。
削除しておきます。

Answer 1

一つのデータフレームでは解決できなかったため、ID・日付のデータフレームとID・回数のデータフレームを作り、left_joinで組み合わせることで解決できました。