Fix #2583 Better author score for multiple topics

Author: fnielsen

scholia/app/templates/topics_authors.sparql

@@ -1,23 +1,24 @@
 # title: Authors for specific topics
 SELECT
-  ?score
+  ((?distinct_topics + ?topics / (?topics + 100)) AS ?score)
   ?author ?authorLabel (CONCAT("/author/", SUBSTR(STR(?author), 32)) AS ?authorUrl)
   ?example_work ?example_workLabel (CONCAT("/work/", SUBSTR(STR(?example_work), 32)) AS ?example_workUrl)
 WITH {
-  SELECT (COUNT(?topic) AS ?score) ?author (SAMPLE(?work_) AS ?example_work)
-    WHERE {
+  SELECT
+    (COUNT(DISTINCT ?topic) AS ?distinct_topics)
+    (COUNT(?topic) AS ?topics)
+    ?author
+    (SAMPLE(?work) AS ?example_work)
+  WHERE {
     VALUES ?topic { {% for q in qs %} wd:{{ q }} {% endfor %} }
 
     # A broad query including "(wdt:P361+ | wdt:P1269+ | (wdt:P31* / wdt:P279*) )" seems to take
     # long time and time out.
-    ?work wdt:P921 ?topic  .
-    ?work wdt:P2860 ?cited_work .
-    { ?cited_work wdt:P50 ?author . BIND(?cited_work AS ?work_) }
-    UNION
-    { ?work wdt:P50 ?author . BIND(?work AS ?work_) }
+    ?work wdt:P921 ?topic  ;
+          wdt:P50 ?author . 
   }
   GROUP BY ?author
-  ORDER BY DESC(?score)
+  ORDER BY DESC(?distinct_topics) DESC(?topics)
   LIMIT 200
 } AS %results
 WHERE {