diff --git a/src/Web/Tweet/API.hs b/src/Web/Tweet/API.hs
--- a/src/Web/Tweet/API.hs
+++ b/src/Web/Tweet/API.hs
@@ -70,6 +70,10 @@
 showBest :: String -> Int -> Bool -> FilePath -> IO String
 showBest screenName n color = fmap (showTweets color . pure . (take n . hits)) . getAll screenName Nothing
 
+-- | Show the most successful tweets by a given user, given their screen name. Additionally filter out replies.
+showBest' :: String -> Int -> Bool -> FilePath -> IO String
+showBest' screenName n color = fmap (showTweets color . pure . (take n . hits')) . getAll screenName Nothing
+
 -- | Mute a user given their screen name
 mute :: String -> FilePath -> IO ()
 mute = (fmap void) . muteUserRaw
diff --git a/src/Web/Tweet/Exec.hs b/src/Web/Tweet/Exec.hs
--- a/src/Web/Tweet/Exec.hs
+++ b/src/Web/Tweet/Exec.hs
@@ -23,7 +23,7 @@
     | Mentions { count :: Maybe Int }
     | Markov { screenName :: String }
     | Send { tweets :: Maybe Int , replyId :: Maybe String , replyHandles :: Maybe [String] , userInput :: String }
-    | Sort { screenName :: String , count :: Maybe Int }
+    | Sort { screenName :: String , count :: Maybe Int , includeReplies :: Bool }
     | Delete { twId :: Integer }
     | Fav { twId :: Integer }
     | Unfav { twId :: Integer }
@@ -79,7 +79,8 @@
 selectCommand (Timeline maybeNum) color file = putStrLn =<< showTimeline (fromMaybe 11 maybeNum) color file
 selectCommand (Mentions maybeNum) color file = putStrLn =<< showTweets color <$> mentions (fromMaybe 11 maybeNum) file
 selectCommand (Profile maybeNum name) color file = putStrLn =<< showProfile (fromMaybe mempty name) (fromMaybe 11 maybeNum) color file
-selectCommand (Sort name maybeNum) color file = putStrLn =<< showBest name (fromMaybe 11 maybeNum) color file
+selectCommand (Sort name maybeNum False) color file = putStrLn =<< showBest' name (fromMaybe 11 maybeNum) color file
+selectCommand (Sort name maybeNum True) color file = putStrLn =<< showBest name (fromMaybe 11 maybeNum) color file
 selectCommand (Markov name) _ file = do
     raw <- getMarkov name Nothing file
     appendFile (name ++ ".txt") (unlines raw)
@@ -246,6 +247,10 @@
         <> short 'n'
         <> metavar "NUM"
         <> help "Number of tweetInputs to fetch, default 12"))
+    <*> switch
+        (long "replies"
+        <> short 'r'
+        <> help "Include replies in your all-time hits")
 
 -- | Parser for the send subcommand
 tweet :: Parser Command
diff --git a/src/Web/Tweet/Utils.hs b/src/Web/Tweet/Utils.hs
--- a/src/Web/Tweet/Utils.hs
+++ b/src/Web/Tweet/Utils.hs
@@ -1,6 +1,7 @@
 -- | Miscellaneous functions that don't fit the project directly
 module Web.Tweet.Utils (
     hits
+  , hits'
   , getTweetsFast
   , getTweets
   , displayTimeline
@@ -24,9 +25,17 @@
 hits :: Timeline -> Timeline
 hits = sortTweets . filterRTs
 
+-- | Filter out retweets and replies, and sort by most sucessful.
+hits' :: Timeline -> Timeline
+hits' = hits . filterReplies
+
 -- | Filter out retweets
 filterRTs :: Timeline -> Timeline
 filterRTs = filter ((/="RT @") . take 4 . (view text))
+
+-- | Filter out replies
+filterReplies :: Timeline -> Timeline
+filterReplies = filter ((/="@") . take 1 . (view text))
 
 -- | Filter out quotes
 filterQuotes :: Timeline -> Timeline
diff --git a/tweet-hs.cabal b/tweet-hs.cabal
--- a/tweet-hs.cabal
+++ b/tweet-hs.cabal
@@ -1,5 +1,5 @@
 name:                tweet-hs
-version:             0.6.1.2
+version:             0.6.1.3
 synopsis:            Command-line tool for twitter
 description:         a Command Line Interface Tweeter
 homepage:            https://github.com/vmchale/command-line-tweeter#readme