Golgo13 vs Golgo14

Golgo13 hits 100 targets out of 100 shoots,
while Golgo14 hits 10 targets out of 10 shoots.

Which Golgo has superior skill in shooting?
Quantify the difference.

Frequentist's approach gets stuck.
It is of no use to chisquared test or Fisher.test.
> mat=matrix(c(100,100,10,10),ncol=2)
> chisq.test(mat)$p.value
[1] 1
> fisher.test(mat)$p.value
[1] 1
p.value is calculated as 1, this is completely useles as are Do-Teihen graduates.

Bayesian analysis is a good solution.
p13 : the distribution of Golgo13's hit rate
p14 : the distribution of Golgo14's hit rate
d: the distribution of their difference
http://i.imgur.com/aL2PSDM.png

Refer to http://egg.2ch.net/test/read.cgi/hosp/1493809494/238-239
for R script and stan code.

> mean(ms$d<0)
[1] 0.09425

We can say there is about 9% probability that Golgo14 marks better.