test: add test for hits_scores() directly

[maelle]

No description provided.

[aviator-app]

Current Aviator status

Aviator will automatically update this comment as the status of the PR changes.
Comment /aviator refresh to force Aviator to re-examine your PR (or learn about other /aviator commands).

This PR was merged using Aviator.

---

See the real-time status of this PR on the Aviator webapp.

Use the Aviator Chrome Extension to see the status of your PR within GitHub.

[szhorvat]

A good test graph for HITS is the following:

make_graph(c(1, 3, 1, 6, 1, 10, 2, 1, 3, 1, 4, 2, 4, 7, 4, 9, 5, 4, 5, 6, 5, 8, 6, 3, 7, 1, 7, 5, 7, 6, 7, 10, 8, 4, 9, 6, 10, 5, 10, 7), directed = TRUE)

An issue with HITS is that often there are multiple valid solutions. I constructed this graph so that there would be precisely one valid solution.

The criterion used is that the graphs corresponding to $AA^T$ and $A^TA$ are connected, with $A$ the adjacency matrix.

Some smaller alternative edge lists that can also be used:

1, 2, 1, 4, 2, 3, 2, 4, 3, 1, 3, 5, 4, 3, 5, 1, 5, 2

1, 2, 1, 3, 1, 5, 2, 1, 3, 2, 3, 4, 4, 2, 5, 1, 5, 2

1, 3, 1, 4, 1, 5, 2, 1, 2, 4, 3, 1, 4, 2, 4, 3, 5, 2

1, 2, 1, 3, 1, 4, 2, 1, 2, 3, 3, 5, 4, 1, 4, 5, 5, 2

There is precisely one valid output for all of these.