Update README.md

README.md

@@ -33,7 +33,7 @@ main = do
   res <- getMetadataWith "ia" 300
   case res of
     (Left err) -> print err
-    (Right r) -> print $ take 5 r
+    (Right r) -> print $ take 5 $ _documents_hits r
 
 ```