<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE article PUBLIC "-//NLM//DTD JATS (Z39.96) Journal Publishing DTD v1.0 20120330//EN" "JATS-journalpublishing1.dtd">
<article xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:xlink="http://www.w3.org/1999/xlink" article-type="research-article">
<front>
<journal-meta>
<journal-id journal-id-type="publisher-id">NEJSDS</journal-id>
<journal-title-group><journal-title>The New England Journal of Statistics in Data Science</journal-title></journal-title-group>
<issn pub-type="ppub">2693-7166</issn><issn-l>2693-7166</issn-l>
<publisher>
<publisher-name>New England Statistical Society</publisher-name>
</publisher>
</journal-meta>
<article-meta>
<article-id pub-id-type="publisher-id">NEJSDS106</article-id>
<article-id pub-id-type="doi">10.51387/26-NEJSDS106</article-id>
<article-categories><subj-group subj-group-type="heading">
<subject>Methodology Article</subject></subj-group><subj-group subj-group-type="area">
<subject>Statistical Methodology</subject></subj-group></article-categories>
<title-group>
<article-title>Limiting the Shrinkage for the Exceptional by Objective Robust Bayesian Analysis: The <italic>“Clemente Problem”</italic></article-title>
</title-group>
<contrib-group>
<contrib contrib-type="author">
<name><surname>Pericchi</surname><given-names>Luis R.</given-names></name><email xlink:href="mailto:luis.pericchi@upr.edu">luis.pericchi@upr.edu</email><xref ref-type="aff" rid="j_nejsds106_aff_001"/>
</contrib>
<contrib contrib-type="author">
<name><surname>Perez</surname><given-names>María-Eglée</given-names></name><email xlink:href="mailto:maria.perez34@upr.edu">maria.perez34@upr.edu</email><xref ref-type="aff" rid="j_nejsds106_aff_002"/><xref ref-type="corresp" rid="cor1">∗</xref>
</contrib>
<aff id="j_nejsds106_aff_001"><institution>University of Puerto Rico, Rio Piedras Campus</institution>, <country>USA</country>. E-mail address: <email xlink:href="mailto:luis.pericchi@upr.edu">luis.pericchi@upr.edu</email></aff>
<aff id="j_nejsds106_aff_002"><institution>University of Puerto Rico, Rio Piedras Campus</institution>, <country>USA</country>. E-mail address: <email xlink:href="mailto:maria.perez34@upr.edu">maria.perez34@upr.edu</email></aff>
</contrib-group>
<author-notes>
<corresp id="cor1"><label>∗</label>Corresponding author.</corresp>
</author-notes>
<pub-date pub-type="ppub"><year>2026</year></pub-date><pub-date pub-type="epub"><day>8</day><month>7</month><year>2026</year></pub-date><volume content-type="ahead-of-print">0</volume><issue>0</issue><fpage>1</fpage><lpage>10</lpage><history><date date-type="accepted"><day>22</day><month>5</month><year>2026</year></date></history>
<permissions><copyright-statement>© 2026 New England Statistical Society</copyright-statement><copyright-year>2026</copyright-year>
<license license-type="open-access" xlink:href="http://creativecommons.org/licenses/by/4.0/">
<license-p>Open access article under the <ext-link ext-link-type="uri" xlink:href="http://creativecommons.org/licenses/by/4.0/">CC BY</ext-link> license.</license-p></license></permissions>
<abstract>
<p>Modern Statistics is made of the sensible combination of direct evidence (the data directly relevant or the “individual data”) and indirect evidence (the data and knowledge indirectly relevant or the “group data”). The admissible procedures combine the two sources of information, and technology advances make indirect evidence more substantial and ubiquitous. It has been pointed out, however, that an important problem of Statistics when “borrowing strength” is to treat in a fundamentally different way exceptional cases that do not adapt to the central “aurea mediocritas”. This is what has been coined as “the Clemente problem” in honor of R. Clemente, an exceptional batter [<xref ref-type="bibr" rid="j_nejsds106_ref_006">6</xref>]. In this article, we argue that the problem is caused by the simultaneous use of square loss function and conjugate (light-tailed) priors, which is the usual procedure. We propose in their place to use robust penalties, in the form of losses that penalize more severely huge errors, or (equivalently) priors of heavy tails which make the exceptional more probable. Using heavy-tailed priors, we can reproduce, in a Bayesian structured way, Efron and Morris’ “limited translated estimators” (with Double Exponential Priors) and “discarding priors estimators” (with Cauchy-like priors), which discard the prior in the presence of prior-likelihood conflict. We show that both Empirical Bayes and Full Bayes approaches can alleviate the Clemente problem and beat the James-Stein estimator in terms of smaller square errors, for sensible Robust Bayes priors. We model in parallel Empirical Bayes and Fully Bayesian hierarchical models, illustrating that the differences among sensible versions of both are relatively small, as compared with the effect due to the robust assumptions. We follow [<xref ref-type="bibr" rid="j_nejsds106_ref_016">16</xref>] in using a heavy-tailed (scaled) Beta2 distribution for (squared) scales that arise naturally as an alternative to the usual Inverted-Gamma distribution. The combination of a Cauchy Prior for location and Scaled Beta2 for square scales yields a novel closed-form prior for location, extremely suitable for Objective Robust Bayesian Analysis. Finally, we calculate the predictive intervals and the Robust models covers the Clemente average at <inline-formula id="j_nejsds106_ineq_001"><alternatives><mml:math>
<mml:mn>80</mml:mn>
<mml:mi mathvariant="normal">%</mml:mi></mml:math><tex-math><![CDATA[$80\% $]]></tex-math></alternatives></inline-formula> of probability, which the conjugate do not. Our approach has connections with [<xref ref-type="bibr" rid="j_nejsds106_ref_025">25</xref>], which employs a completely different methodology. This is an instance of the convergence of the best frequentist and Bayesian analyses [see <xref ref-type="bibr" rid="j_nejsds106_ref_003">3</xref>].</p>
</abstract>
<kwd-group>
<label>Keywords and phrases</label>
<kwd>Cauchy-Scale2 Beta2 prior</kwd>
<kwd>Clemente problem</kwd>
<kwd>Robust loss functions</kwd>
<kwd>Horseshoe priors</kwd>
<kwd>Indirect evidence</kwd>
<kwd>Objective robust Bayesian analysis</kwd>
<kwd>Scaled Beta2 priors</kwd>
</kwd-group>
<funding-group><funding-statement>The first author acknowledges support from: NIH P20 GM148324, P20 GM103475, RO1 CA282427. Both authors acknowledge support from the Biostatistics and Bioinformatics Center (BBC) of the Department of Mathematics, University of Puerto Rico Rio Piedras Campus, and the grant: Demography PR 2026, of the University of Puerto Rico.</funding-statement></funding-group>
</article-meta>
<notes notes-type="dedication" id="j_nejsds106_notes_001">
<p>The authors want to dedicate this work to Roberto Clemente Walker, first Latin American to reach the Baseball Hall of Fame.</p></notes>
</front>
<body>
<sec id="j_nejsds106_s_001">
<label>1</label>
<title>Shrinkage Estimators That Borrow Strength from Indirect Evidence: Too Much of a Good Thing?</title>
<sec id="j_nejsds106_s_002">
<label>1.1</label>
<title>An Historical Example</title>
<p>In [<xref ref-type="bibr" rid="j_nejsds106_ref_008">8</xref>] the authors obtained a sample of batting averages for 18 baseball players during the 1970 season. They used the average obtained during the first 45 at-bats to predict the batting average for the rest of the season for each player.</p>
<table-wrap id="j_nejsds106_tab_001">
<label>Table 1</label>
<caption>
<p>Original data: 1970 batting averages for 18 MLB players.</p>
</caption>
<table>
<thead>
<tr>
<td style="vertical-align: top; text-align: left; border-top: double"/>
<td style="vertical-align: top; text-align: center; border-top: double">Batting average</td>
<td style="vertical-align: top; text-align: center; border-top: double">Batting average</td>
<td style="vertical-align: top; text-align: center; border-top: double">At bats</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Player</td>
<td style="vertical-align: top; text-align: center">for first 45</td>
<td style="vertical-align: top; text-align: center">for remainder</td>
<td style="vertical-align: top; text-align: center">for remainder</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left; border-bottom: double"/>
<td style="vertical-align: top; text-align: center; border-bottom: double">at bats</td>
<td style="vertical-align: top; text-align: center; border-bottom: double">of season</td>
<td style="vertical-align: top; text-align: center; border-bottom: double">of season</td>
</tr>
</thead>
<tbody>
<tr>
<td style="vertical-align: top; text-align: left">Clemente (Pitts, NL)</td>
<td style="vertical-align: top; text-align: center">0.400</td>
<td style="vertical-align: top; text-align: center">0.346</td>
<td style="vertical-align: top; text-align: center">367</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">F. Robinson (Balt, AL)</td>
<td style="vertical-align: top; text-align: center">0.378</td>
<td style="vertical-align: top; text-align: center">0.298</td>
<td style="vertical-align: top; text-align: center">426</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">F. Howard (Wash, AL)</td>
<td style="vertical-align: top; text-align: center">0.356</td>
<td style="vertical-align: top; text-align: center">0.276</td>
<td style="vertical-align: top; text-align: center">521</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Johnstone (Cal, AL)</td>
<td style="vertical-align: top; text-align: center">0.333</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">275</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Berry (Chi, AL)</td>
<td style="vertical-align: top; text-align: center">0.311</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">418</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Spencer (Cal, AL)</td>
<td style="vertical-align: top; text-align: center">0.311</td>
<td style="vertical-align: top; text-align: center">0.270</td>
<td style="vertical-align: top; text-align: center">466</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Kessinger (Chi, NL)</td>
<td style="vertical-align: top; text-align: center">0.289</td>
<td style="vertical-align: top; text-align: center">0.263</td>
<td style="vertical-align: top; text-align: center">586</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Alvarado (Bos, AL)</td>
<td style="vertical-align: top; text-align: center">0.267</td>
<td style="vertical-align: top; text-align: center">0.210</td>
<td style="vertical-align: top; text-align: center">138</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Santo (Chi, NL)</td>
<td style="vertical-align: top; text-align: center">0.244</td>
<td style="vertical-align: top; text-align: center">0.269</td>
<td style="vertical-align: top; text-align: center">510</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Swoboda (NY, NL)</td>
<td style="vertical-align: top; text-align: center">0.244</td>
<td style="vertical-align: top; text-align: center">0.230</td>
<td style="vertical-align: top; text-align: center">200</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Unser (Wash, AL)</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">277</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Williams (Chi, AL)</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.256</td>
<td style="vertical-align: top; text-align: center">270</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Scott (Bos, AL)</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.303</td>
<td style="vertical-align: top; text-align: center">435</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Petrocelli (Bos, AL)</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">538</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">E. Rodriguez (KC, AL)</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.226</td>
<td style="vertical-align: top; text-align: center">186</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Campaneris (Oak, AL)</td>
<td style="vertical-align: top; text-align: center">0.200</td>
<td style="vertical-align: top; text-align: center">0.285</td>
<td style="vertical-align: top; text-align: center">558</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Munson (NY, AL)</td>
<td style="vertical-align: top; text-align: center">0.178</td>
<td style="vertical-align: top; text-align: center">0.316</td>
<td style="vertical-align: top; text-align: center">408</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left; border-bottom: solid thin">Alvis (Mil, NL)</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.156</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.200</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">70</td>
</tr>
</tbody>
</table>
</table-wrap>
<p>In Table <xref rid="j_nejsds106_tab_001">1</xref>, the relevant data are presented. Direct evidence is the observed individual average; thus, the temptation is to predict by the observed individual average, although it is known that this estimator is inadmissible. This is a terrible practical predictor in this case, which has been corroborated in other cases [see <xref ref-type="bibr" rid="j_nejsds106_ref_004">4</xref>]. In contrast, indirect evidence comes in the form of the general mean <inline-formula id="j_nejsds106_ineq_002"><alternatives><mml:math>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>0.265</mml:mn></mml:math><tex-math><![CDATA[$M=0.265$]]></tex-math></alternatives></inline-formula> of all batters.</p>
<p>This “pure indirect evidence” estimator is surprisingly good in this case and far better than the “pure direct evidence”, MLE, or naive estimator, as Brown calls it. However, both intuition and theory point to a sensible combination of the two sources of evidence to improve overall predictions. The problem is then: How much to weigh direct and indirect evidence in each individual case? Wouldn’t it be reasonable to weigh the common indirect evidence less when there is reason to believe that the individual is exceptional? This was the original motivation of Efron and Morris for their clever (and “<italic>ad-hoc</italic>”) “limited translation estimators” [<xref ref-type="bibr" rid="j_nejsds106_ref_007">7</xref>].</p>
</sec>
<sec id="j_nejsds106_s_003">
<label>1.2</label>
<title>Efron and Morris Set Up</title>
<p>The initial assumption about the data in [<xref ref-type="bibr" rid="j_nejsds106_ref_007">7</xref>] is: 
<disp-formula id="j_nejsds106_eq_001">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∼</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>45</mml:mn>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mtext>Bin</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>45</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {Y_{i}}\sim \frac{1}{45}\text{Bin}(45,{p_{i}})\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds106_ineq_003"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${Y_{i}}$]]></tex-math></alternatives></inline-formula> is the batting average for the first 45 at-bats, and <inline-formula id="j_nejsds106_ineq_004"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${p_{i}}$]]></tex-math></alternatives></inline-formula> depends on each player’s ability.</p>
<p>The batting average for the rest of the season, <inline-formula id="j_nejsds106_ineq_005"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${R_{i}}$]]></tex-math></alternatives></inline-formula>, can be modeled as 
<disp-formula id="j_nejsds106_eq_002">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">R</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∼</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mtext>Bin</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {R_{i}}\sim \frac{1}{{n_{i}}}\text{Bin}({n_{i}},{p_{i}})\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds106_ineq_006"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">n</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${n_{i}}$]]></tex-math></alternatives></inline-formula> is the number of at bats for player <italic>i</italic> throughout the remainder of the season.</p>
<p>They applied a variance stabilizing transformation to <inline-formula id="j_nejsds106_ineq_007"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${Y_{i}}$]]></tex-math></alternatives></inline-formula>, 
<disp-formula id="j_nejsds106_eq_003">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msqrt>
<mml:mrow>
<mml:mn>45</mml:mn>
</mml:mrow>
</mml:msqrt>
<mml:mo movablelimits="false">arcsin</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>2</mml:mn>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">Y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {X_{i}}=\sqrt{45}\arcsin (2{Y_{i}}-1)\]]]></tex-math></alternatives>
</disp-formula> 
so that <inline-formula id="j_nejsds106_ineq_008"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mi mathvariant="italic">N</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${X_{i}}\sim N({\mu _{i}},1)$]]></tex-math></alternatives></inline-formula>, with <inline-formula id="j_nejsds106_ineq_009"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mu _{i}}$]]></tex-math></alternatives></inline-formula> approximately equal to the transformed value of <inline-formula id="j_nejsds106_ineq_010"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${p_{i}}$]]></tex-math></alternatives></inline-formula>. The interest is to predict the final individual batting average for the rest of the season. In the sequel, we will use this transformed variable.</p>
<p>The analysis of these baseball data by [<xref ref-type="bibr" rid="j_nejsds106_ref_007">7</xref>] was widely cited and remains one of the clearest expositions in favor of combining “<italic>indirect evidence</italic>” with “<italic>direct evidence</italic>”, a practice often termed “borrowing strength”, “learning from the experience of others”, and “shrinkage estimation”.</p>
</sec>
<sec id="j_nejsds106_s_004">
<label>1.3</label>
<title>The Clemente Problem</title>
<p>In [<xref ref-type="bibr" rid="j_nejsds106_ref_006">6</xref>] a fundamental problem is exposed: <italic>“The Clemente Problem: How to protect atypical cases from too much indirect evidence?”</italic>. Professor Efron refers to the Puerto Rican sportsman Roberto Clemente, an outstanding batter and human being, who had the highest batting average on the list of 18 players. After the first 45 turns, Clemente had a batting average of 0.400, or 40% of hits. Even though shrinking to a general mean improves the overall prediction of the 18 batters, Clemente’s average was predicted as 0.290. The atypical Clemente was not protected from “<italic>too much of a good thing</italic>”, and his personal prediction was very poor: he finished with a batting average of 0.346, much higher than predicted. The problem lies in the fact that the usual method shrinks a fixed proportion to all players; see Equation (<xref rid="j_nejsds106_eq_012">3.3</xref>) below. It makes no exceptions for batters that are too good or too bad. This is a logical consequence of the assumptions made, since it corresponds to an optimal decision in Decision Theory and the coherence of Bayesian analysis. So, in <italic>“What if?”</italic> mode of thought, <italic>“What if?”</italic> if the logical consequences are not <italic>“pleasant to the mind”</italic>, <italic>a fortiori</italic> assumptions must be changed. Fixed proportion estimators are not robust in the sense that the amount of shrinkage is not limited, that is, the potential influence of indirect evidence is unbounded, or using a metaphoric expression, the procedure is “<italic>myopic</italic>” to the conflict between the bulk of the data and the individual [<xref ref-type="bibr" rid="j_nejsds106_ref_015">15</xref>]</p>
</sec>
<sec id="j_nejsds106_s_005">
<label>1.4</label>
<title>Robust Penalties</title>
<p>Our starting point is re-analyzing the Loss (or minus Utility) function. In decision analysis, the Square Loss is by far the most used (or over-used?) and the Clemente problem is (in part) a coherent consequence of its assumption. To see this, we recall the following result in Decision Theory. <statement id="j_nejsds106_stat_001"><label>Result 1.</label>
<p><italic>Suppose that a function of the parameter</italic> <inline-formula id="j_nejsds106_ineq_011"><alternatives><mml:math>
<mml:mi mathvariant="bold-italic">θ</mml:mi></mml:math><tex-math><![CDATA[$\boldsymbol{\theta }$]]></tex-math></alternatives></inline-formula><italic>,</italic> <inline-formula id="j_nejsds106_ineq_012"><alternatives><mml:math>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold-italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$g(\boldsymbol{\theta })$]]></tex-math></alternatives></inline-formula><italic>, is being estimated by</italic> <inline-formula id="j_nejsds106_ineq_013"><alternatives><mml:math>
<mml:mi mathvariant="bold-italic">δ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\boldsymbol{\delta }({X_{1}},\dots ,{X_{m}})$]]></tex-math></alternatives></inline-formula><italic>. Assume the weighted square loss function:</italic> 
<disp-formula id="j_nejsds106_eq_004">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">L</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold-italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="bold-italic">δ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo>=</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:munderover accentunder="false" accent="false">
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:munderover>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">L</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1"/>
<mml:mtd class="eqnarray-2">
<mml:mo>=</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:munderover accentunder="false" accent="false">
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∑</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">m</mml:mi>
</mml:mrow>
</mml:munderover>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>·</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.1667em"/>
<mml:mspace width="0.1667em"/>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo stretchy="false">≥</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle L(g(\boldsymbol{\theta }),\boldsymbol{\delta })& \displaystyle =& \displaystyle {\sum \limits_{i=1}^{m}}{L_{i}}(g({\theta _{i}}),{\delta _{i}}(\mathbf{X}))\\ {} & \displaystyle =& \displaystyle {\sum \limits_{i=1}^{m}}w({\theta _{i}})\cdot {({\delta _{i}}(\mathbf{X})-g({\theta _{i}}))^{2}},\hspace{0.1667em}\hspace{0.1667em}w({\theta _{i}})\ge 0.\end{array}\]]]></tex-math></alternatives>
</disp-formula> 
<italic>Then the optimal Bayes estimator is:</italic> 
<disp-formula id="j_nejsds106_eq_005">
<label>(1.1)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>·</mml:mo>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mtext mathvariant="italic">data</mml:mtext>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mtext mathvariant="italic">data</mml:mtext>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {\delta _{i}}(\mathbf{X})=\frac{E[w({\theta _{i}})\cdot g({\theta _{i}})|\textit{data}]}{E[w({\theta _{i}})|\textit{data}]}.\]]]></tex-math></alternatives>
</disp-formula>
</p></statement><bold>Proof:</bold> Page 47 in [<xref ref-type="bibr" rid="j_nejsds106_ref_009">9</xref>].</p>
<p>Although this result may be termed as classical, its statistical consequences have not been fully appreciated. In fact (<xref rid="j_nejsds106_eq_005">1.1</xref>) invites two strategies: the first is to weight the square loss and use (<xref rid="j_nejsds106_eq_005">1.1</xref>) as the individual estimator, and the second is to change the prior in a way suggested by (<xref rid="j_nejsds106_eq_005">1.1</xref>) while keeping the square loss function. These are two different viewpoints that shed different light and possibilities. In this article, we highlight assumptions to get robust solutions in both ways.</p>
</sec>
</sec>
<sec id="j_nejsds106_s_006">
<label>2</label>
<title>Heavier than Quadratic Losses</title>
<p>For simplicity, we will assume we are estimating <inline-formula id="j_nejsds106_ineq_014"><alternatives><mml:math>
<mml:mi mathvariant="bold-italic">θ</mml:mi></mml:math><tex-math><![CDATA[$\boldsymbol{\theta }$]]></tex-math></alternatives></inline-formula>, that is, <inline-formula id="j_nejsds106_ineq_015"><alternatives><mml:math>
<mml:mi mathvariant="italic">g</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold-italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="bold-italic">θ</mml:mi></mml:math><tex-math><![CDATA[$g(\boldsymbol{\theta })=\boldsymbol{\theta }$]]></tex-math></alternatives></inline-formula>.</p>
<p>To diminish the shrinkage at the extremes, the loss function (centered around the overall group location) must penalize errors far from the overall location more heavily than the square loss. We also need an origin <italic>M</italic> to anchor the weighting function <inline-formula id="j_nejsds106_ineq_016"><alternatives><mml:math>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$w({\theta _{i}})$]]></tex-math></alternatives></inline-formula>. This origin <italic>M</italic> might be chosen subjectively, using prior knowledge and experience, or empirically, and could be interpreted as the mean of the <inline-formula id="j_nejsds106_ineq_017"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\theta _{i}}$]]></tex-math></alternatives></inline-formula>’s.</p><statement id="j_nejsds106_stat_002"><label>Example 1</label>
<title>(Exponentially weighted loss).</title>
<p>
<disp-formula id="j_nejsds106_eq_006">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr class="split-mtr">
<mml:mtd class="split-mtd">
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">L</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">e</mml:mi>
<mml:mi mathvariant="italic">x</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="split-mtd">
<mml:mo>=</mml:mo>
<mml:mo movablelimits="false">exp</mml:mo>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo>·</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mo fence="true" stretchy="false">]</mml:mo>
<mml:mo>·</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr class="split-mtr">
<mml:mtd class="split-mtd"/>
<mml:mtd class="split-mtd">
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">m</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mn>0</mml:mn>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}{L_{i}^{exp}}({\theta _{i}},{\delta _{i}}(\mathbf{X}))& =\exp [r\cdot |{\theta _{i}}-M|]\cdot {({\theta _{i}}-{\delta _{i}}(\mathbf{X}))^{2}},\\ {} & i=1,\dots ,m,r\gt 0\end{aligned}\]]]></tex-math></alternatives>
</disp-formula>
</p></statement>
<p>Calculation yields the optimal estimator in (<xref rid="j_nejsds106_eq_005">1.1</xref>) as 
<disp-formula id="j_nejsds106_eq_007">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">e</mml:mi>
<mml:mi mathvariant="italic">x</mml:mi>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">a</mml:mi>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mo fence="true" stretchy="false">]</mml:mo>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">a</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">c</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>+</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo>−</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">a</mml:mi>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">a</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo>−</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {\delta _{i}^{exp}}(\mathbf{X})=\frac{a[b({\mu _{1i}}-rv)-c]+{a^{\prime }}[{c^{\prime }}+(1-{b^{\prime }})({\mu _{1i}}+rv)]}{ab+{a^{\prime }}(1-{b^{\prime }})},\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds106_ineq_018"><alternatives><mml:math>
<mml:mi mathvariant="italic">a</mml:mi>
<mml:mo>=</mml:mo>
<mml:mo movablelimits="false">exp</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">r</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" stretchy="false">/</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$a=\exp (r(M-{\mu _{1i}})+v{r^{2}}/2))$]]></tex-math></alternatives></inline-formula>, <inline-formula id="j_nejsds106_ineq_019"><alternatives><mml:math>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="normal">Φ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo>−</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$b=\Phi (\frac{(M-({\mu _{1i}}-rv)}{\sqrt{v}})$]]></tex-math></alternatives></inline-formula>, <inline-formula id="j_nejsds106_ineq_020"><alternatives><mml:math>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mo>=</mml:mo>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msqrt>
<mml:mi mathvariant="italic">ϕ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo>−</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$c=\sqrt{v}\phi (\frac{M-({\mu _{1i}}-rv)}{\sqrt{v}})$]]></tex-math></alternatives></inline-formula>, <inline-formula id="j_nejsds106_ineq_021"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">a</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mo movablelimits="false">exp</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">˜</mml:mo></mml:mover>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">r</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" stretchy="false">/</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${a^{\prime }}=\exp (r({\mu _{1i}}-\tilde{\theta })+v{r^{2}}/2))$]]></tex-math></alternatives></inline-formula>,<inline-formula id="j_nejsds106_ineq_022"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="normal">Φ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">˜</mml:mo></mml:mover>
<mml:mo>−</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${b^{\prime }}=\Phi (\frac{\tilde{\theta }-({\mu _{1i}}+vr)}{\sqrt{v}})$]]></tex-math></alternatives></inline-formula>,<inline-formula id="j_nejsds106_ineq_023"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">c</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>′</mml:mo>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msqrt>
<mml:mi mathvariant="italic">ϕ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">˜</mml:mo></mml:mover>
<mml:mo>−</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">r</mml:mi>
<mml:mi mathvariant="italic">v</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">v</mml:mi>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${c^{\prime }}=\sqrt{v}\phi (\frac{\tilde{\theta }-({\mu _{1i}}+rv)}{\sqrt{v}})$]]></tex-math></alternatives></inline-formula>, and <inline-formula id="j_nejsds106_ineq_024"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">v</mml:mi></mml:math><tex-math><![CDATA[${\mu _{1i}},v$]]></tex-math></alternatives></inline-formula> are the posterior mean and variance, respectively, of a Normal likelihood with a Normal prior.</p>
<p>This and other loss functions can lead to tractable results, but it is more convenient for the purposes of the present paper to work with losses that also have a direct interpretation in terms of heavy tailed (robust) priors, which penalize discrepancies more heavily and are naturally scaled.</p><statement id="j_nejsds106_stat_003"><label>Example 2</label>
<title>(Cauchy over Gaussian Loss:).</title>
<p><italic>Here we place a Cauchy density over a Gaussian, both centered at M with matched interquartile range.</italic> 
<disp-formula id="j_nejsds106_eq_008">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">L</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">C</mml:mi>
<mml:mi mathvariant="italic">G</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mtext mathvariant="italic">Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">N</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2.19</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo>·</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {L_{i}^{CG}}({\theta _{i}},{\delta _{i}}(\mathbf{X}))=\frac{\textit{Cauchy}({\theta _{i}}|M,1)}{N({\theta _{i}}|M,2.19)}\cdot {({\theta _{i}}-{\delta _{i}}(\mathbf{X}))^{2}}.\]]]></tex-math></alternatives>
</disp-formula>
</p></statement>
<p>Figure <xref rid="j_nejsds106_fig_001">1</xref> shows the Cauchy over Gaussian loss, being quite close to a square loss around zero but growing fast without bound for “exceptional” values.</p>
<fig id="j_nejsds106_fig_001">
<label>Figure 1</label>
<caption>
<p>Quadratic loss and Cauchy over Gaussian loss (<inline-formula id="j_nejsds106_ineq_025"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi></mml:math><tex-math><![CDATA[${\delta _{i}}=M$]]></tex-math></alternatives></inline-formula>).</p>
</caption>
<graphic xlink:href="nejsds106_g001.jpg"/>
</fig>
<statement id="j_nejsds106_stat_004"><label>Result 2.</label>
<p><italic>In fact, the optimal estimator (</italic><xref rid="j_nejsds106_eq_005"><italic>1.1</italic></xref><italic>) under the</italic> <inline-formula id="j_nejsds106_ineq_026"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">L</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">C</mml:mi>
<mml:mi mathvariant="italic">G</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">δ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${L_{i}^{CG}}({\theta _{i}},{\delta _{i}}(\mathbf{X}))$]]></tex-math></alternatives></inline-formula> <italic>is the posterior expectation under a Cauchy prior, since using the Gaussian with mean M and variance</italic> 2.19 <italic>as a prior</italic> 
<disp-formula id="j_nejsds106_eq_009">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr>
<mml:mtd class="align-odd">
<mml:mi mathvariant="italic">δ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>·</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mi mathvariant="italic">w</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mtd>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mo largeop="false" movablelimits="false">∫</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mtext mathvariant="italic">Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">N</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2.19</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>·</mml:mo>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mi mathvariant="italic">d</mml:mi>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mo largeop="false" movablelimits="false">∫</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mtext mathvariant="italic">Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">N</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>2.19</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="bold">X</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mi mathvariant="italic">d</mml:mi>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="align-odd"/>
<mml:mtd class="align-even">
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:mtext mathvariant="bold">X</mml:mtext>
<mml:mtext mathvariant="italic">, Cauchy Prior</mml:mtext>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}\delta (\mathbf{X})=\frac{E[w({\theta _{i}})\cdot {\theta _{i}}|\mathbf{X}]}{E[w({\theta _{i}})|\mathbf{X}]}& =\frac{\textstyle\int \frac{\textit{Cauchy}({\theta _{i}}|M,1)}{N({\theta _{i}}|M,2.19)}{\theta _{i}}\cdot \pi ({\theta _{i}}|\mathbf{X})d{\theta _{i}}}{\textstyle\int \frac{\textit{Cauchy}({\theta _{i}}|M,1)}{N({\theta _{i}}|M,2.19)}\pi ({\theta _{i}}|\mathbf{X})d{\theta _{i}})}\\ {} & =E[{\theta _{i}}|\textbf{X}\textit{, Cauchy Prior}]\end{aligned}\]]]></tex-math></alternatives>
</disp-formula>
</p></statement>
<p>In words, the optimal estimator under the Robust Cauchy over Gaussian penalty (and Gaussian prior) is the posterior expectation under a Cauchy Prior, since with square loss, the optimal estimator is the posterior expectation.</p>
<p>So, a bridge has been established between Robust Losses and Robust Priors through equation (<xref rid="j_nejsds106_eq_005">1.1</xref>). We call it comprehensive Robustness, the use of Robust Loss Functions, or the use of Robust (heavy tailed) Priors. For convenience, now we go to the “Robust Prior Route”.</p>
<p>In what follows we try different models, in two methods: Empirical Bayes and Fully Robust Bayes, trying to solve, or at least alleviate, the Clemente problem, that is, the lack of robustness of the exponential family models with conjugate (light-tailed) priors and squared loss function.</p>
</sec>
<sec id="j_nejsds106_s_007">
<label>3</label>
<title>Robust Consequences of Robust (Heavily Tailed) Priors</title>
<p>In this section, we motivate briefly the use of heavy tailed priors as a tool for robustness. Back in the situation of subsection <xref rid="j_nejsds106_s_003">1.2</xref>, let us make the usual assumption of a Normal Likelihood and Prior: <disp-formula-group id="j_nejsds106_dg_001">
<disp-formula id="j_nejsds106_eq_010">
<label>(3.1)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.2778em"/>
<mml:mspace width="0.2778em"/>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>18</mml:mn>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle {X_{i}}& \displaystyle \sim & \displaystyle \text{Normal}({\mu _{i}},1),\hspace{0.2778em}\hspace{0.2778em}i=1,\dots ,18\end{array}\]]]></tex-math></alternatives>
</disp-formula>
<disp-formula id="j_nejsds106_eq_011">
<label>(3.2)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle {\mu _{i}}& \displaystyle \sim & \displaystyle \text{Normal}(\text{M},{\sigma _{0}^{2}}),\end{array}\]]]></tex-math></alternatives>
</disp-formula>
</disp-formula-group> where <inline-formula id="j_nejsds106_ineq_027"><alternatives><mml:math>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$(\text{M},{\sigma _{0}^{2}})$]]></tex-math></alternatives></inline-formula> has been assigned, for instance via an Empirical Bayesian method as in [<xref ref-type="bibr" rid="j_nejsds106_ref_007">7</xref>] or using previous year batting averages (for 1969, the global batting average was 0.248, see for example <uri>http://www.baseball-reference.com/leagues/MLB/1969.shtml</uri>). These assumptions, coupled with square error loss, lead to the posterior conditional expectation as the optimal estimator, which can be written as: 
<disp-formula id="j_nejsds106_eq_012">
<label>(3.3)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>+</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ E({\mu _{i}}|{x_{i}})={x_{i}}+\frac{1}{1+{\sigma _{0}^{2}}}(M-{x_{i}}).\]]]></tex-math></alternatives>
</disp-formula>
</p>
<p>It is convenient here to define shrinkage as <inline-formula id="j_nejsds106_ineq_028"><alternatives><mml:math>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo></mml:math><tex-math><![CDATA[$|E({\mu _{i}}|{x_{i}})-{x_{i}}|$]]></tex-math></alternatives></inline-formula>. There are several ways to analyze the lack of robustness of (<xref rid="j_nejsds106_eq_012">3.3</xref>), but the one most relevant here is: <italic>all batters, whether exceptional or average, are shifted to the mean of the means M by a</italic> <bold><italic>fixed</italic></bold> <italic>proportion</italic> <inline-formula id="j_nejsds106_ineq_029"><alternatives><mml:math>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" stretchy="false">/</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$c=1/(1+{\sigma _{0}^{2}})$]]></tex-math></alternatives></inline-formula>, so the shrinkage is <inline-formula id="j_nejsds106_ineq_030"><alternatives><mml:math>
<mml:mi mathvariant="italic">c</mml:mi>
<mml:mo>·</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mo>−</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">x</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo stretchy="false">|</mml:mo></mml:math><tex-math><![CDATA[$c\cdot |M-{x_{i}}|$]]></tex-math></alternatives></inline-formula>. That is the “Clemente Problem”. Notice that increasing the prior variance <inline-formula id="j_nejsds106_ineq_031"><alternatives><mml:math>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup></mml:math><tex-math><![CDATA[${\sigma _{0}^{2}}$]]></tex-math></alternatives></inline-formula> is <bold>not</bold> a fix to the problem: it would certainly reduce the shrinkage, but to all batters in equal proportion, even to those who are not exceptional. We are not proposing an indiscriminate reduction of the shrinkage, but rather a differential shrinkage. The posterior mean (<xref rid="j_nejsds106_eq_012">3.3</xref>) is <italic>myopic</italic> to the exception. Now (<xref rid="j_nejsds106_eq_012">3.3</xref>) is the logical consequence of the assumptions. Thus, the only logical way to change it is to change the assumptions. We could change the loss, but equivalently, we change the tail behavior of the priors: using flatter tails gives Bayes Theorem the input that the exceptional is more likely, and probabilistic (not ad-hoc impositions) coherence then acts as a “robustifier” of the estimation.</p>
<p>Our first alternative is a Double Exponential prior: 
<disp-formula id="j_nejsds106_eq_013">
<label>(3.4)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>DE</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">ν</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">ν</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:msqrt>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo movablelimits="false">exp</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mo>−</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
</mml:mrow>
</mml:msqrt>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">ν</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">μ</mml:mi>
<mml:mo>−</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo stretchy="false">|</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle \mu & \displaystyle \sim & \displaystyle \text{DE}(\text{M},{\nu _{0}})=\frac{1}{{\nu _{0}}\sqrt{2}}\exp (-\frac{\sqrt{(}2)}{{\nu _{0}}}|\mu -\text{M}|),\end{array}\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds106_ineq_032"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">ν</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
</mml:mrow>
</mml:msqrt>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
<mml:mrow>
<mml:mo movablelimits="false">log</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="normal">Φ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0.75</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${\nu _{0}}=\frac{\sqrt{(}2){\sigma _{0}}}{\log (2)}{\Phi ^{-1}}(0.75)$]]></tex-math></alternatives></inline-formula>, to match the quartiles of the Normal prior. Finally for even heavier tails we explore with a Cauchy prior. 
<disp-formula id="j_nejsds106_eq_014">
<label>(3.5)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>C</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">γ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">γ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
</mml:mrow>
</mml:mfrac>
</mml:mstyle><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">μ</mml:mi>
<mml:mo>−</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" stretchy="false">/</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mi mathvariant="italic">γ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msubsup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle \mu & \displaystyle \sim & \displaystyle \text{C}(\text{M},{\gamma _{0}})=\frac{1}{\pi {\gamma _{0}}}\frac{1}{1+{(\mu -\text{M})^{2}}/{\gamma _{0}^{2}}},\end{array}\]]]></tex-math></alternatives>
</disp-formula> 
where <inline-formula id="j_nejsds106_ineq_033"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">γ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:mo>=</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
</mml:msub>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="normal">Φ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0.75</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[${\gamma _{0}}={\sigma _{0}}{\Phi ^{-1}}(0.75)$]]></tex-math></alternatives></inline-formula>, again to match Normal quartiles.</p>
<p>For exact and approximate results with these, and other priors, see for example [<xref ref-type="bibr" rid="j_nejsds106_ref_017">17</xref>], but Figures <xref rid="j_nejsds106_fig_002">2</xref> and <xref rid="j_nejsds106_fig_003">3</xref> tell the story. In Figure <xref rid="j_nejsds106_fig_002">2</xref> the observation is kept fixed at zero and the prior location is moved to create a conflict between one data point and a prior. With a Normal prior the shrinkage grows linearly without bound. The other two priors yield robust estimators. For a Double Exponential prior, the posterior expectation becomes essentially a ‘<italic>limited translation estimator</italic>” in Efron and Morris’ terminology. The influence of the overall mean <inline-formula id="j_nejsds106_ineq_034"><alternatives><mml:math>
<mml:mtext>M</mml:mtext></mml:math><tex-math><![CDATA[$\text{M}$]]></tex-math></alternatives></inline-formula> is bounded and monotonic. Finally, for the Cauchy prior, the posterior expectation is <bold>not</bold> monotonic in the conflict between the MLE and the General Mean. Furthermore, the prior is progressively discarded in favor of the MLE, as the general mean and MLE diverge. It is also quite interesting that the shrinkage of the two robust priors is almost the same close to the center, that is, around the general average <italic>M</italic>, and actually they give more shrinkage near the center than the Normal.</p>
<fig id="j_nejsds106_fig_002">
<label>Figure 2</label>
<caption>
<p>Observation fixed at zero prior location varying. Normal linear unbounded influence of prior location, monotone limited translation in Double Exponential and discarding influence in the Cauchy.</p>
</caption>
<graphic xlink:href="nejsds106_g002.jpg"/>
</fig>
<p>In Figure <xref rid="j_nejsds106_fig_003">3</xref> we are showing the actual values of the transformed data <inline-formula id="j_nejsds106_ineq_035"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.2778em"/>
<mml:mspace width="0.2778em"/>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>18</mml:mn></mml:math><tex-math><![CDATA[${X_{i}},\hspace{0.2778em}\hspace{0.2778em}i=1,\dots ,18$]]></tex-math></alternatives></inline-formula> on the x axis. The prior location <inline-formula id="j_nejsds106_ineq_036"><alternatives><mml:math>
<mml:mtext>M</mml:mtext></mml:math><tex-math><![CDATA[$\text{M}$]]></tex-math></alternatives></inline-formula> is fixed at the sample overall average. Around the middle-ground the three estimators are very close together. But at some point, the robust estimators separate from the Normal, in the direction of the MLE, being the adjustment towards the MLE of the Cauchy somewhat stronger than that of the Double-Exponential.</p>
<fig id="j_nejsds106_fig_003">
<label>Figure 3</label>
<caption>
<p>Prior location fixed at the general average. Observations displayed in the X-Axis. Different Shrinkage behavior displayed of Normal, Double Exponential and Cauchy priors.</p>
</caption>
<graphic xlink:href="nejsds106_g003.jpg"/>
</fig>
</sec>
<sec id="j_nejsds106_s_008">
<label>4</label>
<title>Models</title>
<p>We will consider two types of strategies, Empirical Bayes and Full Bayesian strategies.</p>
<sec id="j_nejsds106_s_009">
<label>4.1</label>
<title>Empirical Bayes Strategy</title>
<p>Following [<xref ref-type="bibr" rid="j_nejsds106_ref_008">8</xref>], general location and scale parameters are calculated from the sample: <inline-formula id="j_nejsds106_ineq_037"><alternatives><mml:math>
<mml:mtext>M</mml:mtext>
<mml:mo>=</mml:mo><mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">¯</mml:mo></mml:mover>
<mml:mo>=</mml:mo>
<mml:mo>−</mml:mo>
<mml:mn>3.3166</mml:mn></mml:math><tex-math><![CDATA[$\text{M}=\bar{X}=-3.3166$]]></tex-math></alternatives></inline-formula> and <inline-formula id="j_nejsds106_ineq_038"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">˜</mml:mo></mml:mover>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\tilde{\sigma }^{2}}$]]></tex-math></alternatives></inline-formula> such that <inline-formula id="j_nejsds106_ineq_039"><alternatives><mml:math><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">˜</mml:mo></mml:mover>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
<mml:mo>−</mml:mo>
<mml:mn>3</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:msubsup>
<mml:mrow>
<mml:mo largeop="false" movablelimits="false">∑</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">k</mml:mi>
</mml:mrow>
</mml:msubsup>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo>−</mml:mo><mml:mover accent="true">
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mo stretchy="false">¯</mml:mo></mml:mover>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle></mml:math><tex-math><![CDATA[$\frac{1}{(1+{\tilde{\sigma }^{2}})}=\frac{k-3}{{\textstyle\sum _{i=1}^{k}}{({X_{i}}-\bar{X})^{2}}}$]]></tex-math></alternatives></inline-formula>, so <inline-formula id="j_nejsds106_ineq_040"><alternatives><mml:math>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo>=</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>=</mml:mo>
<mml:mn>3.7853</mml:mn></mml:math><tex-math><![CDATA[$\tau ={({\sigma ^{2}})^{-1}}=3.7853$]]></tex-math></alternatives></inline-formula>.</p>
<p><bold>Models 1, 2 and 3</bold>, are defined with the likelihood (<xref rid="j_nejsds106_eq_010">3.1</xref>) and respectively priors (<xref rid="j_nejsds106_eq_011">3.2</xref>), (<xref rid="j_nejsds106_eq_013">3.4</xref>) and (<xref rid="j_nejsds106_eq_014">3.5</xref>). The justification is as follows: the first prior corresponds to the original analysis by Efron and Morris, Double Exponential and Cauchy priors are two heavy tailed priors (as compared with Normal) that promote a qualitatively different behavior of the estimators. The three priors have the same origin given by an Empirical Bayes analysis, and their scales have been matched by equating interquartile ranges to facilitate comparison.</p>
</sec>
<sec id="j_nejsds106_s_010">
<label>4.2</label>
<title>Full Bayesian Strategy</title>
<sec id="j_nejsds106_s_011">
<label>4.2.1</label>
<title>Model 4: Full Bayesian Conjugate Model</title>
<p>This model assigns vague conjugate priors to the common mean <italic>M</italic> and the common variance <inline-formula id="j_nejsds106_ineq_041"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\sigma ^{2}}$]]></tex-math></alternatives></inline-formula>. This is the fully Bayes version of Efron and Morris Empirical Bayes model. 
<disp-formula id="j_nejsds106_eq_015">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>18</mml:mn>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">M</mml:mi>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mi mathvariant="italic">N</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mn>10</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>5</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.2778em"/>
<mml:mspace width="0.2778em"/>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext>Inv-Gamma</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0.01</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>0.01</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle {X_{i}}& \displaystyle \sim & \displaystyle \text{Normal}({\mu _{i}},1),i=1,\dots ,18\\ {} \displaystyle {\mu _{i}}& \displaystyle \sim & \displaystyle \text{Normal}(\text{M},{\sigma ^{2}})\\ {} \displaystyle M& \displaystyle \sim & \displaystyle N(0,{10^{5}}),\hspace{0.2778em}\hspace{0.2778em}{\sigma ^{2}}\sim \text{Inv-Gamma}(0.01,0.01)\end{array}\]]]></tex-math></alternatives>
</disp-formula>
</p>
<p>To make Model 4 robust, it is not enough to change the Normal Prior assumption. It is also necessary to replace the Inverted-Gamma distribution assumption regarding the scales, see [<xref ref-type="bibr" rid="j_nejsds106_ref_012">12</xref>]. We first present the alternative models and delay until next section the discussion of the Scaled Beta2 model (SBeta2).</p>
</sec>
<sec id="j_nejsds106_s_012">
<label>4.2.2</label>
<title>Model 5: Normal Likelihood, Double Exponential Prior for <inline-formula id="j_nejsds106_ineq_042"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mu _{i}}$]]></tex-math></alternatives></inline-formula>, Vague Double Exponential Prior for the General Mean <italic>M</italic>, Scaled Beta2<inline-formula id="j_nejsds106_ineq_043"><alternatives><mml:math>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$(1,1,1)$]]></tex-math></alternatives></inline-formula> Prior for the Scale Parameter <inline-formula id="j_nejsds106_ineq_044"><alternatives><mml:math>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">ν</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle></mml:math><tex-math><![CDATA[$\sigma =\frac{\nu }{\sqrt{2}}$]]></tex-math></alternatives></inline-formula></title>
<disp-formula id="j_nejsds106_eq_016">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>18</mml:mn>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>DE</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msqrt>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msqrt>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">M</mml:mi>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>DE</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msqrt>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msqrt>
<mml:mo>×</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mn>10</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>3</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.2778em"/>
<mml:mspace width="0.2778em"/>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext>Beta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle {X_{i}}& \displaystyle \sim & \displaystyle \text{Normal}({\mu _{i}},1),i=1,\dots ,18\\ {} \displaystyle {\mu _{i}}& \displaystyle \sim & \displaystyle \text{DE}(\text{M},\sqrt{2}\sigma )\\ {} \displaystyle M& \displaystyle \sim & \displaystyle \text{DE}(0,\sqrt{2}\times {10^{3}}),\hspace{0.2778em}\hspace{0.2778em}\sigma \sim \text{Beta2}(1,1,1)\end{array}\]]]></tex-math></alternatives>
</disp-formula>
</sec>
<sec id="j_nejsds106_s_013">
<label>4.2.3</label>
<title>Model 6: Normal Likelihood, Cauchy Prior for <inline-formula id="j_nejsds106_ineq_045"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mu _{i}}$]]></tex-math></alternatives></inline-formula>, Vague Cauchy Prior for the General Mean <italic>M</italic>, Scaled Beta2<inline-formula id="j_nejsds106_ineq_046"><alternatives><mml:math>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$(1,1,4)$]]></tex-math></alternatives></inline-formula> Prior for the Scale Parameter</title>
<disp-formula id="j_nejsds106_eq_017">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>18</mml:mn>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">M</mml:mi>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mn>10</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>3</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.2778em"/>
<mml:mspace width="0.2778em"/>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext>SBeta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle {X_{i}}& \displaystyle \sim & \displaystyle \text{Normal}({\mu _{i}},1),i=1,\dots ,18\\ {} \displaystyle {\mu _{i}}& \displaystyle \sim & \displaystyle \text{Cauchy}(\text{M},\sigma )\\ {} \displaystyle M& \displaystyle \sim & \displaystyle \text{Cauchy}(0,{10^{3}}),\hspace{0.2778em}\hspace{0.2778em}\sigma \sim \text{SBeta2}(1,1,4)\end{array}\]]]></tex-math></alternatives>
</disp-formula>
</sec>
<sec id="j_nejsds106_s_014">
<label>4.2.4</label>
<title>Model 7: Normal Likelihood, Cauchy Prior for <inline-formula id="j_nejsds106_ineq_047"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${\mu _{i}}$]]></tex-math></alternatives></inline-formula>, Vague Cauchy Prior for the General Mean <italic>M</italic>, Scaled Beta2<inline-formula id="j_nejsds106_ineq_048"><alternatives><mml:math>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$(1,1,4)$]]></tex-math></alternatives></inline-formula> Prior for the Squared Scale Parameter</title>
<disp-formula id="j_nejsds106_eq_018">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right center left" columnspacing="10.0pt 10.0pt">
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">X</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Normal</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">i</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mo>…</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>18</mml:mn>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">μ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">i</mml:mi>
</mml:mrow>
</mml:msub>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>M</mml:mtext>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr>
<mml:mtd class="eqnarray-1">
<mml:mi mathvariant="italic">M</mml:mi>
</mml:mtd>
<mml:mtd class="eqnarray-2">
<mml:mo stretchy="false">∼</mml:mo>
</mml:mtd>
<mml:mtd class="eqnarray-3">
<mml:mtext>Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mn>10</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>3</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mspace width="0.2778em"/>
<mml:mspace width="0.2778em"/>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext>SBeta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>4</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{array}{r@{\hskip10.0pt}c@{\hskip10.0pt}l}\displaystyle {X_{i}}& \displaystyle \sim & \displaystyle \text{Normal}({\mu _{i}},1),i=1,\dots ,18\\ {} \displaystyle {\mu _{i}}& \displaystyle \sim & \displaystyle \text{Cauchy}(\text{M},\sigma )\\ {} \displaystyle M& \displaystyle \sim & \displaystyle \text{Cauchy}(0,{10^{3}}),\hspace{0.2778em}\hspace{0.2778em}{\sigma ^{2}}\sim \text{SBeta2}(1,1,4)\end{array}\]]]></tex-math></alternatives>
</disp-formula>
</sec>
</sec>
<sec id="j_nejsds106_s_015">
<label>4.3</label>
<title>The Scaled Beta2 Distribution as a Prior for Scales</title>
<p>In these last three models, robust priors (Double Exponential and Cauchy) have been assigned for the locations. On the other hand, we propose the use of the <bold>scaled Beta distribution of the second kind</bold> with parameters <italic>p</italic>, <italic>q</italic> and <italic>b</italic> family (<inline-formula id="j_nejsds106_ineq_049"><alternatives><mml:math>
<mml:mtext>SBeta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\text{SBeta2}(p,q,b)$]]></tex-math></alternatives></inline-formula>) as priors for the scale parameters or for squares of scales. Let <italic>Y</italic> be a random variable such that <inline-formula id="j_nejsds106_ineq_050"><alternatives><mml:math>
<mml:mi mathvariant="italic">Y</mml:mi>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext>Beta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$Y\sim \text{Beta2}(p,q,b)$]]></tex-math></alternatives></inline-formula>; its density function [<xref ref-type="bibr" rid="j_nejsds106_ref_013">13</xref>, <xref ref-type="bibr" rid="j_nejsds106_ref_016">16</xref>, <xref ref-type="bibr" rid="j_nejsds106_ref_010">10</xref>] is given by: 
<disp-formula id="j_nejsds106_eq_019">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">y</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="normal">Γ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="normal">Γ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mi mathvariant="normal">Γ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo>·</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">y</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">y</mml:mi>
<mml:mo mathvariant="normal">&gt;</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ p(y|p,q)=\frac{\Gamma (p+q)}{\Gamma (p)\Gamma (q)}\frac{1}{b}\cdot \frac{{\left(\frac{y}{b}\right)^{p-1}}}{{\left(1+\frac{y}{b}\right)^{(p+q)}}},y\gt 0,\]]]></tex-math></alternatives>
</disp-formula>
</p>
<p>This family has a very natural justification as a prior for variances in hierarchical models, as it is obtained as a scale mixture of Gamma distributions, through a Gamma mixing distribution, in much the same way that the Student-t is obtained as a scale mixture of Normal distributions [<xref ref-type="bibr" rid="j_nejsds106_ref_016">16</xref>]. The usual prior assumed for scales is the Inverted Gamma family with very large prior variance. This practice has come under criticism by [<xref ref-type="bibr" rid="j_nejsds106_ref_012">12</xref>], where the author, among other alternatives, proposes a half-Cauchy prior. The Scaled Beta2 prior has flexible tail behavior, which makes it particularly suitable for modeling. When p = q = 1, the SBeta2(1,1,b) prior is very close to the half-Cauchy, so we use it here. (If <italic>σ</italic> is Half-Cauchy scale <italic>b</italic>, then <inline-formula id="j_nejsds106_ineq_051"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">σ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${\sigma ^{2}}$]]></tex-math></alternatives></inline-formula> is SBeta2(1/2,1/2, <inline-formula id="j_nejsds106_ineq_052"><alternatives><mml:math>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[${b^{2}}$]]></tex-math></alternatives></inline-formula>)).</p>
<p>What is the assumed prior for the location parameter in Model 6 after integrating out the scale? This is the so-called Cauchy-Scaled Beta 2 [<xref ref-type="bibr" rid="j_nejsds106_ref_016">16</xref>], which deserves special mention on its own.</p><statement id="j_nejsds106_stat_005"><label>Definition 1</label>
<title>(Cauchy-Scaled Beta2 Prior).</title>
<p><italic>Assume that</italic> <inline-formula id="j_nejsds106_ineq_053"><alternatives><mml:math>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext mathvariant="italic">Cauchy</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\theta |\sigma \sim \textit{Cauchy}(0,\sigma )$]]></tex-math></alternatives></inline-formula><italic>, and</italic> <inline-formula id="j_nejsds106_ineq_054"><alternatives><mml:math>
<mml:mi mathvariant="italic">σ</mml:mi>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mtext mathvariant="italic">Beta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\sigma \sim \textit{Beta2}(p,q,b)$]]></tex-math></alternatives></inline-formula><italic>, then θ is distributed as a</italic> <inline-formula id="j_nejsds106_ineq_055"><alternatives><mml:math>
<mml:mtext mathvariant="italic">Cauchy - Scaled Beta2</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>0</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo></mml:math><tex-math><![CDATA[$\textit{Cauchy - Scaled Beta2}(0,p,q,b)$]]></tex-math></alternatives></inline-formula><italic>.</italic></p></statement>
<p>It is remarkable that when <inline-formula id="j_nejsds106_ineq_056"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn></mml:math><tex-math><![CDATA[$p=q=1$]]></tex-math></alternatives></inline-formula> (an assignment that makes the Beta2 distribution have Cauchy tails), the marginal density for <italic>θ</italic> has an explicit formula (after a long integration by simple fractions):</p><statement id="j_nejsds106_stat_006"><label>Result 3.</label>
<p><italic>The marginal density for the location θ of a Cauchy-Scaled Beta2 prior is:</italic> 
<disp-formula id="j_nejsds106_eq_020">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true" columnalign="right left" columnspacing="0pt">
<mml:mtr class="split-mtr">
<mml:mtd class="split-mtd">
<mml:mi mathvariant="italic">π</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mtd>
<mml:mtd class="split-mtd">
<mml:mo>=</mml:mo>
<mml:msubsup>
<mml:mrow>
<mml:mstyle displaystyle="true">
<mml:mo largeop="true" movablelimits="false">∫</mml:mo></mml:mstyle>
</mml:mrow>
<mml:mrow>
<mml:mn>0</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi>∞</mml:mi>
</mml:mrow>
</mml:msubsup><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mspace width="0.1667em"/>
<mml:mi mathvariant="italic">d</mml:mi>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mtd>
</mml:mtr>
<mml:mtr class="split-mtr">
<mml:mtd class="split-mtd"/>
<mml:mtd class="split-mtd">
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:msup>
<mml:mrow>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mfenced separators="" open="[" close="">
<mml:mrow>
<mml:mo>−</mml:mo>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>+</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">θ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
</mml:mfenced>
<mml:mo>+</mml:mo>
</mml:mtd>
</mml:mtr>
<mml:mtr class="split-mtr">
<mml:mtd class="split-mtd"/>
<mml:mtd class="split-mtd">
<mml:mfenced separators="" open="" close="]">
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>+</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mfenced separators="" open="(" close=")">
<mml:mrow>
<mml:mo movablelimits="false">log</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>−</mml:mo>
<mml:mo movablelimits="false">log</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfenced>
</mml:mrow>
</mml:mfenced>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[\begin{aligned}{}\pi (\theta )& ={\int _{0}^{\infty }}\frac{b\tau }{\pi {(b+\tau )^{2}}\left({\theta ^{2}}+{\tau ^{2}}\right)}\hspace{0.1667em}d\tau \\ {} & =\frac{b}{\pi {\left({b^{2}}+{\theta ^{2}}\right)^{2}}}\left[-\left({b^{2}}+{\theta ^{2}}-\pi b|\theta |\right)\right.+\\ {} & \left.(b-\theta )(b+\theta )\left(\log (b)-\log (|\theta |)\right)\right]\end{aligned}\]]]></tex-math></alternatives>
</disp-formula> 
<italic>[see</italic> <xref ref-type="bibr" rid="j_nejsds106_ref_016"><italic>16</italic></xref><italic>].</italic></p></statement>
<fig id="j_nejsds106_fig_004">
<label>Figure 4</label>
<caption>
<p>Comparison of Cauchy-Scaled Beta2, Normal, Double Exponential and Cauchy distributions, at the center (upper figure) and at the tail (lower figure).</p>
</caption>
<graphic xlink:href="nejsds106_g004.jpg"/>
</fig>
<p>In Figure <xref rid="j_nejsds106_fig_004">4</xref>, the Cauchy-Scaled Beta2 prior is displayed along with the Cauchy, Double-Exponential and Normal. This prior enjoys several features that explain why it is so efficient in predicting the batter’s averages. This prior is unbounded as <inline-formula id="j_nejsds106_ineq_057"><alternatives><mml:math>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo stretchy="false">→</mml:mo>
<mml:mn>0</mml:mn></mml:math><tex-math><![CDATA[$\theta \to 0$]]></tex-math></alternatives></inline-formula> and has tails even heavier than Cauchy. In [<xref ref-type="bibr" rid="j_nejsds106_ref_005">5</xref>] [see also <xref ref-type="bibr" rid="j_nejsds106_ref_018">18</xref>] finds such characteristics for a prior to be both robust and leading to efficient estimation (they propose particular prior which does not have an explicit form and that they call “horseshoe” prior). Furthermore, the Cauchy-Scaled Beta2 besides obeying such desiderata, has an explicit form (at least for p=q=1) which makes it amenable for mathematical analysis. We do not know of any other explicit “horseshoe” prior. (In [<xref ref-type="bibr" rid="j_nejsds106_ref_016">16</xref>] results for other values of hyper-parameters are obtained)</p>
<p>Using again a Cauchy prior for the location parameter, the Scaled Beta2 family can be also be used as a prior for the square of the scale, and a closed form for the marginal of the location parameter <italic>θ</italic> is also available [see <xref ref-type="bibr" rid="j_nejsds106_ref_010">10</xref>].</p><statement id="j_nejsds106_stat_007"><label>Result 4.</label>
<p><italic>Assume</italic> <inline-formula id="j_nejsds106_ineq_058"><alternatives><mml:math>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$\theta |{\tau ^{2}}$]]></tex-math></alternatives></inline-formula> <italic>has the form</italic> 
<disp-formula id="j_nejsds106_eq_021">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">μ</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">τ</mml:mi>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
</mml:msqrt>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo>·</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo fence="true" stretchy="false">[</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">μ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo fence="true" stretchy="false">]</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mo>−</mml:mo>
<mml:mn>1</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo mathvariant="normal">,</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ \pi (\theta |\mu ,\tau ,b)=\frac{1}{\pi \sqrt{b}\tau }\cdot {[1+\frac{{(\theta -\mu )^{2}}}{b{\tau ^{2}}}]^{-1}},\]]]></tex-math></alternatives>
</disp-formula> 
<italic>and</italic> 
<disp-formula id="j_nejsds106_eq_022">
<alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">∼</mml:mo>
<mml:mi mathvariant="italic">S</mml:mi>
<mml:mi mathvariant="italic">B</mml:mi>
<mml:mi mathvariant="italic">e</mml:mi>
<mml:mi mathvariant="italic">t</mml:mi>
<mml:mi mathvariant="italic">a</mml:mi>
<mml:mn>2</mml:mn>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mi mathvariant="italic">τ</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
<mml:mo stretchy="false">|</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo mathvariant="normal">,</mml:mo>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ {\tau ^{2}}\sim SBeta2({\tau ^{2}}|1,1,b).\]]]></tex-math></alternatives>
</disp-formula>
</p>
<p><italic>Then the marginal density for the location θ is</italic>
<disp-formula id="j_nejsds106_eq_023">
<label>(4.1)</label><alternatives><mml:math display="block">
<mml:mtable displaystyle="true">
<mml:mtr>
<mml:mtd>
<mml:mi mathvariant="italic">π</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
<mml:mo>=</mml:mo><mml:mstyle displaystyle="true">
<mml:mfrac>
<mml:mrow>
<mml:mn>1</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
</mml:msqrt>
<mml:mo>·</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mn>1</mml:mn>
<mml:mo>+</mml:mo><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mo stretchy="false">|</mml:mo>
<mml:mi mathvariant="italic">θ</mml:mi>
<mml:mo>−</mml:mo>
<mml:mi mathvariant="italic">μ</mml:mi>
<mml:mo stretchy="false">|</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:msqrt>
<mml:mrow>
<mml:mi mathvariant="italic">b</mml:mi>
</mml:mrow>
</mml:msqrt>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mn>2</mml:mn>
</mml:mrow>
</mml:msup>
</mml:mrow>
</mml:mfrac>
</mml:mstyle>
<mml:mo>.</mml:mo>
</mml:mtd>
</mml:mtr>
</mml:mtable></mml:math><tex-math><![CDATA[\[ \pi (\theta )=\frac{1}{2\sqrt{b}\cdot {(1+\frac{|\theta -\mu |}{\sqrt{b}})^{2}}}.\]]]></tex-math></alternatives>
</disp-formula>
</p></statement>
<p>This is an interesting marginal on itself, close to a Cauchy, and it does not have a pole at zero, so it is not a Horseshoe prior. In [<xref ref-type="bibr" rid="j_nejsds106_ref_010">10</xref>] this prior is studied and applied in detail. In fact a general result for the marginal of the location, for any <italic>p</italic> and <italic>q</italic> is obtained in terms of the Hypergeometric Function.<!--br role="newline" /--></p>
<p><bold>Assessments of Hyper-parameters in the Scaled Beta 2 Distribution:</bold> We assessed <inline-formula id="j_nejsds106_ineq_059"><alternatives><mml:math>
<mml:mi mathvariant="italic">p</mml:mi>
<mml:mo>=</mml:mo>
<mml:mi mathvariant="italic">q</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>1</mml:mn></mml:math><tex-math><![CDATA[$p=q=1$]]></tex-math></alternatives></inline-formula> in model 6 and 7, which is a sensible default assumption since then, both the value of the scale and its reciprocal are finite at zero, and both tails are very heavy. We also assumed <inline-formula id="j_nejsds106_ineq_060"><alternatives><mml:math>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>4</mml:mn></mml:math><tex-math><![CDATA[$b=4$]]></tex-math></alternatives></inline-formula>, which is larger than three times the estimator of the between variance, and the results for larger values were found to be quite similar to those with <inline-formula id="j_nejsds106_ineq_061"><alternatives><mml:math>
<mml:mi mathvariant="italic">b</mml:mi>
<mml:mo>=</mml:mo>
<mml:mn>3</mml:mn></mml:math><tex-math><![CDATA[$b=3$]]></tex-math></alternatives></inline-formula>.</p>
</sec>
</sec>
<sec id="j_nejsds106_s_016">
<label>5</label>
<title>Model Predictions</title>
<p>All proposed models were fitted using Stan (version 2.32) [<xref ref-type="bibr" rid="j_nejsds106_ref_019">19</xref>] through package <monospace>rstan</monospace> (version 2.37.2) [<xref ref-type="bibr" rid="j_nejsds106_ref_020">20</xref>]. Table <xref rid="j_nejsds106_tab_002">2</xref> shows the batting averages predicted for each of the models, and in Figure <xref rid="j_nejsds106_fig_005">5</xref> we display the milder shrinkage of the extremes using robust priors, particularly Cauchy priors, when compared to that of Model 1 and Model 4.</p>
<table-wrap id="j_nejsds106_tab_002">
<label>Table 2</label>
<caption>
<p>Estimators and mean square error of prediction for MLE, general mean, empirical Bayes models and full Bayesian models.</p>
</caption>
<table>
<thead>
<tr>
<td style="vertical-align: top; text-align: left; border-top: double">Player</td>
<td style="vertical-align: top; text-align: center; border-top: double">Observed</td>
<td style="vertical-align: top; text-align: center; border-top: double">First 45</td>
<td style="vertical-align: top; text-align: center; border-top: double">General</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model 1</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model 2</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model3</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model 4</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model 5</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model 6</td>
<td style="vertical-align: top; text-align: center; border-top: double">Model 7</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">season</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">(MLE)</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">mean</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin"/>
</tr>
</thead>
<tbody>
<tr>
<td style="vertical-align: top; text-align: left">Clemente</td>
<td style="vertical-align: top; text-align: center">0.346</td>
<td style="vertical-align: top; text-align: center">0.400</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.290</td>
<td style="vertical-align: top; text-align: center">0.304</td>
<td style="vertical-align: top; text-align: center">0.314</td>
<td style="vertical-align: top; text-align: center">0.282</td>
<td style="vertical-align: top; text-align: center">0.298</td>
<td style="vertical-align: top; text-align: center">0.291</td>
<td style="vertical-align: top; text-align: center">0.309</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Robinson</td>
<td style="vertical-align: top; text-align: center">0.298</td>
<td style="vertical-align: top; text-align: center">0.378</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.286</td>
<td style="vertical-align: top; text-align: center">0.296</td>
<td style="vertical-align: top; text-align: center">0.301</td>
<td style="vertical-align: top; text-align: center">0.279</td>
<td style="vertical-align: top; text-align: center">0.291</td>
<td style="vertical-align: top; text-align: center">0.283</td>
<td style="vertical-align: top; text-align: center">0.296</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Howard</td>
<td style="vertical-align: top; text-align: center">0.276</td>
<td style="vertical-align: top; text-align: center">0.356</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.282</td>
<td style="vertical-align: top; text-align: center">0.288</td>
<td style="vertical-align: top; text-align: center">0.291</td>
<td style="vertical-align: top; text-align: center">0.277</td>
<td style="vertical-align: top; text-align: center">0.285</td>
<td style="vertical-align: top; text-align: center">0.2762</td>
<td style="vertical-align: top; text-align: center">0.287</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Johnstone</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.333</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.277</td>
<td style="vertical-align: top; text-align: center">0.281</td>
<td style="vertical-align: top; text-align: center">0.282</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">0.279</td>
<td style="vertical-align: top; text-align: center">0.272</td>
<td style="vertical-align: top; text-align: center">0.279</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Berry</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">0.311</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">0.275</td>
<td style="vertical-align: top; text-align: center">0.275</td>
<td style="vertical-align: top; text-align: center">0.270</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">0.269</td>
<td style="vertical-align: top; text-align: center">0.273</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Spencer</td>
<td style="vertical-align: top; text-align: center">0.270</td>
<td style="vertical-align: top; text-align: center">0.311</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">0.275</td>
<td style="vertical-align: top; text-align: center">0.275</td>
<td style="vertical-align: top; text-align: center">0.270</td>
<td style="vertical-align: top; text-align: center">0.273</td>
<td style="vertical-align: top; text-align: center">0.269</td>
<td style="vertical-align: top; text-align: center">0.273</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Kessinger</td>
<td style="vertical-align: top; text-align: center">0.263</td>
<td style="vertical-align: top; text-align: center">0.289</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.269</td>
<td style="vertical-align: top; text-align: center">0.269</td>
<td style="vertical-align: top; text-align: center">0.270</td>
<td style="vertical-align: top; text-align: center">0.267</td>
<td style="vertical-align: top; text-align: center">0.268</td>
<td style="vertical-align: top; text-align: center">0.266</td>
<td style="vertical-align: top; text-align: center">0.269</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Alvarado</td>
<td style="vertical-align: top; text-align: center">0.210</td>
<td style="vertical-align: top; text-align: center">0.267</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">0.263</td>
<td style="vertical-align: top; text-align: center">0.263</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Santo</td>
<td style="vertical-align: top; text-align: center">0.269</td>
<td style="vertical-align: top; text-align: center">0.244</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.259</td>
<td style="vertical-align: top; text-align: center">0.258</td>
<td style="vertical-align: top; text-align: center">0.259</td>
<td style="vertical-align: top; text-align: center">0.261</td>
<td style="vertical-align: top; text-align: center">0.259</td>
<td style="vertical-align: top; text-align: center">0.260</td>
<td style="vertical-align: top; text-align: center">0.259</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Swoboda</td>
<td style="vertical-align: top; text-align: center">0.230</td>
<td style="vertical-align: top; text-align: center">0.244</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.259</td>
<td style="vertical-align: top; text-align: center">0.258</td>
<td style="vertical-align: top; text-align: center">0.259</td>
<td style="vertical-align: top; text-align: center">0.260</td>
<td style="vertical-align: top; text-align: center">0.259</td>
<td style="vertical-align: top; text-align: center">0.260</td>
<td style="vertical-align: top; text-align: center">0.259</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Unser</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.255</td>
<td style="vertical-align: top; text-align: center">0.252</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.258</td>
<td style="vertical-align: top; text-align: center">0.253</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Williams</td>
<td style="vertical-align: top; text-align: center">0.256</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.255</td>
<td style="vertical-align: top; text-align: center">0.252</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Scott</td>
<td style="vertical-align: top; text-align: center">0.303</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.255</td>
<td style="vertical-align: top; text-align: center">0.252</td>
<td style="vertical-align: top; text-align: center">0.253</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.253</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Petrocelli</td>
<td style="vertical-align: top; text-align: center">0.264</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.255</td>
<td style="vertical-align: top; text-align: center">0.252</td>
<td style="vertical-align: top; text-align: center">0.253</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.253</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Rodriguez</td>
<td style="vertical-align: top; text-align: center">0.226</td>
<td style="vertical-align: top; text-align: center">0.222</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.255</td>
<td style="vertical-align: top; text-align: center">0.252</td>
<td style="vertical-align: top; text-align: center">0.253</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.257</td>
<td style="vertical-align: top; text-align: center">0.254</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Campaneris</td>
<td style="vertical-align: top; text-align: center">0.285</td>
<td style="vertical-align: top; text-align: center">0.200</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.250</td>
<td style="vertical-align: top; text-align: center">0.245</td>
<td style="vertical-align: top; text-align: center">0.247</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.248</td>
<td style="vertical-align: top; text-align: center">0.254</td>
<td style="vertical-align: top; text-align: center">0.247</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Munson</td>
<td style="vertical-align: top; text-align: center">0.316</td>
<td style="vertical-align: top; text-align: center">0.178</td>
<td style="vertical-align: top; text-align: center">0.265</td>
<td style="vertical-align: top; text-align: center">0.245</td>
<td style="vertical-align: top; text-align: center">0.237</td>
<td style="vertical-align: top; text-align: center">0.238</td>
<td style="vertical-align: top; text-align: center">0.251</td>
<td style="vertical-align: top; text-align: center">0.242</td>
<td style="vertical-align: top; text-align: center">0.249</td>
<td style="vertical-align: top; text-align: center">0.240</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left; border-bottom: solid thin">Alvis</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.200</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.156</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.265</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.240</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.228</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.226</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.247</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.234</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.242</td>
<td style="vertical-align: top; text-align: center; border-bottom: solid thin">0.230</td>
</tr>
</tbody><tbody>
<tr>
<td style="vertical-align: top; text-align: left"><bold>MSE (</bold><inline-formula id="j_nejsds106_ineq_062"><alternatives><mml:math>
<mml:mo>×</mml:mo>
<mml:msup>
<mml:mrow>
<mml:mn>10</mml:mn>
</mml:mrow>
<mml:mrow>
<mml:mn>3</mml:mn>
</mml:mrow>
</mml:msup></mml:math><tex-math><![CDATA[$\times {10^{3}}$]]></tex-math></alternatives></inline-formula><bold>)</bold></td>
<td style="vertical-align: top; text-align: center"/>
<td style="vertical-align: top; text-align: center"><bold>4.184</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.348</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.196</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.187</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.137</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.198</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.168</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.108</bold></td>
<td style="vertical-align: top; text-align: center"><bold>1.117</bold></td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left"><inline-formula id="j_nejsds106_ineq_063"><alternatives><mml:math><mml:mstyle displaystyle="false">
<mml:mfrac>
<mml:mrow>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mi mathvariant="italic">S</mml:mi>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>Model</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">M</mml:mi>
<mml:mi mathvariant="italic">S</mml:mi>
<mml:mi mathvariant="italic">E</mml:mi>
<mml:mo mathvariant="normal" fence="true" stretchy="false">(</mml:mo>
<mml:mtext>Model 1</mml:mtext>
<mml:mo mathvariant="normal" fence="true" stretchy="false">)</mml:mo>
</mml:mrow>
</mml:mfrac>
</mml:mstyle></mml:math><tex-math><![CDATA[$\frac{MSE(\text{Model})}{MSE(\text{Model 1})}$]]></tex-math></alternatives></inline-formula></td>
<td style="vertical-align: top; text-align: center"/>
<td style="vertical-align: top; text-align: center"><bold>350%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>113%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>100%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>99%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>95%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>100%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>98%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>93%</bold></td>
<td style="vertical-align: top; text-align: center"><bold>93%</bold></td>
</tr>
</tbody>
</table>
</table-wrap>
<fig id="j_nejsds106_fig_005">
<label>Figure 5</label>
<caption>
<p>Comparison of shrinkages: upper figure shows observed data, Efron and Morris estimates and Robust Empirical Bayes estimates. The lower figure shows observed data, non-robust Full Bayes estimates and Robust Full Bayes estimates.</p>
</caption>
<graphic xlink:href="nejsds106_g005.jpg"/>
</fig>
<fig id="j_nejsds106_fig_006">
<label>Figure 6</label>
<caption>
<p>80% (solid line) and 95% (dotted line) prediction intervals for Clemente’s batting average by the end of the season. The actual value, 0.346, is shown by the dashed line.</p>
</caption>
<graphic xlink:href="nejsds106_g006.jpg"/>
</fig>
<p>Robustifying the priors pays dividends twice: the relative shrinkage of the extremes is lower and, at the same time, the error of prediction is diminished up to <inline-formula id="j_nejsds106_ineq_064"><alternatives><mml:math>
<mml:mn>7</mml:mn>
<mml:mi mathvariant="normal">%</mml:mi></mml:math><tex-math><![CDATA[$7\% $]]></tex-math></alternatives></inline-formula> for Models 6 and 7, which use the Cauchy-Scaled Beta2 and the Cauchy-Scale2 Beta 2 priors respectively. Model 3, which incorporates the Cauchy prior has, for example, a square prediction error 5% lower than Model 1, and predicts for Clemente a more respectful 0.314 average, much higher than the 0.290 from Model 1. Something similar may be said for Model 6 and Model 7. On the other hand, the price paid seems less than modest: computational tools as approximations and MCMC algorithms that make the computations routine are now available.</p>
<p>Thus by a very modest cost in computation, the “robustified” model has achieved both goals, decreasing the MSE and solving or at least alleviating the Clemente problem.</p>
<p>In terms of alternative approaches of Statistics that merge direct and indirect evidence, the difference between (sensible and objective versions) of Empirical and Fully Bayes Hierarchical Modeling is relatively small as compared with the difference between heavy and light tail priors.</p>
<p>In general, the Clemente problem is closely related to the implicit dogmatism inherent, not in Bayes in general, but in “Conjugate Bayes with Square Loss”. The way out seems to be: either an Empirical or Fully Bayesian Hierarchical Model, but making emphasis on Robustness.</p>
<p>In many contexts, Bayesian models are compared using methods focused on the predictive performance in cross-validation using tools as Watanabe-Akaike Information Criterion [<xref ref-type="bibr" rid="j_nejsds106_ref_024">24</xref>] and Leave One Out cross validation (LOO-CV) criterion [<xref ref-type="bibr" rid="j_nejsds106_ref_022">22</xref>]. WAIC and LOO were calculated using R-package <monospace>loo</monospace> [<xref ref-type="bibr" rid="j_nejsds106_ref_023">23</xref>]. Table <xref rid="j_nejsds106_tab_003">3</xref> shows the results</p>
<table-wrap id="j_nejsds106_tab_003">
<label>Table 3</label>
<caption>
<p>WAIC and LOO values for proposed empirical Bayes models and full Bayesian models.</p>
</caption>
<table>
<thead>
<tr>
<td style="vertical-align: top; text-align: left; border-top: double; border-bottom: solid thin">Model</td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin">WAIC</td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin">SE</td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin"><inline-formula id="j_nejsds106_ineq_065"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">W</mml:mi>
<mml:mi mathvariant="italic">A</mml:mi>
<mml:mi mathvariant="italic">I</mml:mi>
<mml:mi mathvariant="italic">C</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${p_{WAIC}}$]]></tex-math></alternatives></inline-formula></td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin">SE</td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin">LOO</td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin">SE</td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin"><inline-formula id="j_nejsds106_ineq_066"><alternatives><mml:math>
<mml:msub>
<mml:mrow>
<mml:mi mathvariant="italic">p</mml:mi>
</mml:mrow>
<mml:mrow>
<mml:mi mathvariant="italic">L</mml:mi>
<mml:mi mathvariant="italic">O</mml:mi>
<mml:mi mathvariant="italic">O</mml:mi>
</mml:mrow>
</mml:msub></mml:math><tex-math><![CDATA[${p_{LOO}}$]]></tex-math></alternatives></inline-formula></td>
<td style="vertical-align: top; text-align: right; border-top: double; border-bottom: solid thin">SE</td>
</tr>
</thead>
<tbody>
<tr>
<td style="vertical-align: top; text-align: left">Model 1</td>
<td style="vertical-align: top; text-align: right">52.1</td>
<td style="vertical-align: top; text-align: right">3.8</td>
<td style="vertical-align: top; text-align: right">2.9</td>
<td style="vertical-align: top; text-align: right">0.6</td>
<td style="vertical-align: top; text-align: right">52.3</td>
<td style="vertical-align: top; text-align: right">3.9</td>
<td style="vertical-align: top; text-align: right">3.0</td>
<td style="vertical-align: top; text-align: right">0.7</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Model 2</td>
<td style="vertical-align: top; text-align: right">52.4</td>
<td style="vertical-align: top; text-align: right">3.4</td>
<td style="vertical-align: top; text-align: right">3.4</td>
<td style="vertical-align: top; text-align: right">0.7</td>
<td style="vertical-align: top; text-align: right">53.0</td>
<td style="vertical-align: top; text-align: right">3.5</td>
<td style="vertical-align: top; text-align: right">3.8</td>
<td style="vertical-align: top; text-align: right">0.8</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Model 3</td>
<td style="vertical-align: top; text-align: right">52.5</td>
<td style="vertical-align: top; text-align: right">3.5</td>
<td style="vertical-align: top; text-align: right">3.5</td>
<td style="vertical-align: top; text-align: right">0.7</td>
<td style="vertical-align: top; text-align: right">53.9</td>
<td style="vertical-align: top; text-align: right">3.5</td>
<td style="vertical-align: top; text-align: right">4.2</td>
<td style="vertical-align: top; text-align: right">0.7</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Model 4</td>
<td style="vertical-align: top; text-align: right">54.2</td>
<td style="vertical-align: top; text-align: right">4.5</td>
<td style="vertical-align: top; text-align: right">3.0</td>
<td style="vertical-align: top; text-align: right">0.7</td>
<td style="vertical-align: top; text-align: right">54.6</td>
<td style="vertical-align: top; text-align: right">4.5</td>
<td style="vertical-align: top; text-align: right">3.2</td>
<td style="vertical-align: top; text-align: right">0.7</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Model 5</td>
<td style="vertical-align: top; text-align: right">54.2</td>
<td style="vertical-align: top; text-align: right">4.5</td>
<td style="vertical-align: top; text-align: right">3.0</td>
<td style="vertical-align: top; text-align: right">0.7</td>
<td style="vertical-align: top; text-align: right">54.6</td>
<td style="vertical-align: top; text-align: right">4.5</td>
<td style="vertical-align: top; text-align: right">3.2</td>
<td style="vertical-align: top; text-align: right">0.7</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left">Model 6</td>
<td style="vertical-align: top; text-align: right">54.2</td>
<td style="vertical-align: top; text-align: right">4.5</td>
<td style="vertical-align: top; text-align: right">3.0</td>
<td style="vertical-align: top; text-align: right">0.7</td>
<td style="vertical-align: top; text-align: right">54.6</td>
<td style="vertical-align: top; text-align: right">4.5</td>
<td style="vertical-align: top; text-align: right">3.2</td>
<td style="vertical-align: top; text-align: right">0.7</td>
</tr>
<tr>
<td style="vertical-align: top; text-align: left; border-bottom: solid thin">Model 7</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">54.4</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">3.9</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">4.0</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">0.9</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">55.8</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">4.5</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">4.7</td>
<td style="vertical-align: top; text-align: right; border-bottom: solid thin">0.9</td>
</tr>
</tbody>
</table>
</table-wrap>
<p>According to Table <xref rid="j_nejsds106_tab_003">3</xref>, these two popular methods have little discriminatory power between models but slightly prefer conjugate ones. This is in contrast to a prediction perspective. The <inline-formula id="j_nejsds106_ineq_067"><alternatives><mml:math>
<mml:mn>80</mml:mn>
<mml:mi mathvariant="normal">%</mml:mi></mml:math><tex-math><![CDATA[$80\% $]]></tex-math></alternatives></inline-formula> intervals of the Robust Models 3, 6 and 7, cover the Clemente Data but not the others (see Figure <xref rid="j_nejsds106_fig_006">6</xref>). It is striking that the best models in terms of WAIC and LOO are the poorest in prediction coverage. Coverage is a main objective of this article, as a consequence of structured Bayesian modeling. In summary, the best predictive models (in terms of coverage and in terms of Mean Squared Errors) are robust models, based on the Cauchy and Scaled-Beta 2 distributions. This is the case whether from an Empirical Bayes or Full Bayesian methodology. On the other hand, methods for model selection like WAIC and LOO performed badly in prediction and coverage.</p>
</sec>
<sec id="j_nejsds106_s_017">
<label>6</label>
<title>“Objective Robust Bayesian Analysis”</title>
<p>It can be argued about the great relevance of Objective Robust Bayesian Analysis (ORBA). To put this article in perspective, we should mention some contributions. The first, although its approach is subjective, is [<xref ref-type="bibr" rid="j_nejsds106_ref_001">1</xref>], which uses the theory of Regularly Varying (RV) functions to assess robustness for general location and scale parameters. The second is [<xref ref-type="bibr" rid="j_nejsds106_ref_011">11</xref>], where the Generalized Polynomial Tails Comparison (GPTC) Theorem is proved, and the properties of specific robust priors are analyzed. In [<xref ref-type="bibr" rid="j_nejsds106_ref_015">15</xref>], the relationship between RV and GPTC is established. On the other hand, [<xref ref-type="bibr" rid="j_nejsds106_ref_005">5</xref>] introduced the “Horseshoe Estimator,” which obeys certain desiderata convenient for robust analysis in hierarchical models.</p>
<p>In the present article, we add the following insights: 1) We established a bridge between robust losses and robust priors, by weight ratios times the square loss, using the expression (<xref rid="j_nejsds106_eq_005">1.1</xref>) to compute the optimal. Example <xref rid="j_nejsds106_stat_003">2</xref> provides a specific example of how to assess a robust loss through the ratio of a flat-tailed prior over a Gaussian. The theoretical duality between losses and priors has been mentioned before, for example, by [<xref ref-type="bibr" rid="j_nejsds106_ref_002">2</xref>, p. 161], but we also search for the consequences of looking at robust procedures through the glass of robust penalties. Furthermore, note that the connection between priors and losses is done through an empirical Bayes component, since the loss is centered and scaled through an EB reasoning. 2) We employ systematically here a robust prior for scales, the Scaled Beta2, which is a convenient alternative to the overused Inverted-Gamma prior. Furthermore, we show the Cauchy-Scaled Beta2 prior, which is an explicit objective prior that obeys the desiderata of a “Horseshoe” prior, as well as the Cauchy-Scaled Beta2 prior with general closed form marginal distributions for location parameters. 3) We illustrate, using a classical data set, that it is possible to alleviate the “Clemente problem” and at the same time reduce the mean square error of prediction as compared with non-robust conjugate approaches and with the James-Stein estimator. 4) We illustrate that the differences between sensible versions of Empirical Bayes and Objective Bayes are relatively small in practice. Much more important is the difference between robust Bayes and conjugate Bayes. This, coupled with the fact that Robust Bayes is, in general, less dogmatic, in the sense that in conflict prior information is discarded or at least with limited influence, makes Objective Robust Bayes a strong candidate for statistical synthesis.</p>
<p>The scope of applications of Robust Objective Procedures is wide-ranging and includes any problem calling for the use of hierarchical models. Just to mention a few, in the analysis of population dynamics for the orchid genus <italic>Caladenia</italic> presented in [<xref ref-type="bibr" rid="j_nejsds106_ref_021">21</xref>], hierarchical models based on vague conjugate priors were used, but although the model selection procedures clearly pointed towards a hierarchical model as the selected one, they gave results that were not biologically sound, probably due to excessive shrinkage toward the species with more data. Another example is the unfair “pulling down” of hitherto perfect-scoring hospitals in hospital profiling, simply because a couple of hospitals have poor performance [see <xref ref-type="bibr" rid="j_nejsds106_ref_014">14</xref>]. <italic>“Shrinkage is a good thing, but non-robust-conjugate methods yield too much of a good thing”</italic>.</p>
</sec>
</body>
<back>
<ack id="j_nejsds106_ack_001">
<title>Acknowledgements</title>
<p>The authors would like to thank two anonymous referees, whose comments led to important improvements to this paper.</p></ack>
<ref-list id="j_nejsds106_reflist_001">
<title>References</title>
<ref id="j_nejsds106_ref_001">
<label>[1]</label><mixed-citation publication-type="journal"><string-name><surname>Andrade</surname>, <given-names>J. A. A.</given-names></string-name> and <string-name><surname>O’Hagan</surname>, <given-names>A.</given-names></string-name> (<year>2006</year>). <article-title>Bayesian Robustness Modeling Using Regularly Varying Distribution</article-title>. <source>Bayesian Analysis</source> <volume>1</volume> <fpage>169</fpage>–<lpage>188</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/06-BA106" xlink:type="simple">https://doi.org/10.1214/06-BA106</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2227369">MR2227369</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_002">
<label>[2]</label><mixed-citation publication-type="book"><string-name><surname>Berger</surname>, <given-names>J. O.</given-names></string-name> (<year>1985</year>) <source>Statistical Decision Theory and Bayesian Analysis</source>. <publisher-name>Springer-Verlag</publisher-name>, <publisher-loc>New York</publisher-loc>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1007/978-1-4757-4286-2" xlink:type="simple">https://doi.org/10.1007/978-1-4757-4286-2</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=0804611">MR0804611</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_003">
<label>[3]</label><mixed-citation publication-type="journal"><string-name><surname>Berger</surname>, <given-names>J. O.</given-names></string-name> (<year>2023</year>). <article-title>Four Types of Frequentism and Their Interplay with Bayesianism</article-title>. <source>New England Journal of Statistics in Data Science</source> <volume>1(2)</volume> <fpage>126</fpage>–<lpage>137</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.51387/22-NEJSDS4" xlink:type="simple">https://doi.org/10.51387/22-NEJSDS4</ext-link>.</mixed-citation>
</ref>
<ref id="j_nejsds106_ref_004">
<label>[4]</label><mixed-citation publication-type="journal"><string-name><surname>Brown</surname>, <given-names>L. D.</given-names></string-name> (<year>2008</year>). <article-title>In-Season Prediction of Batting Averages: a Field Test of Empirical Bayes and Bayes Methodologies</article-title>. <source>The Annals of Applied Statistics</source> <volume>2</volume> <fpage>113</fpage>–<lpage>214</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/07-AOAS138" xlink:type="simple">https://doi.org/10.1214/07-AOAS138</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2415597">MR2415597</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_005">
<label>[5]</label><mixed-citation publication-type="journal"><string-name><surname>Carvalho</surname>, <given-names>C. M.</given-names></string-name>, <string-name><surname>Polson</surname>, <given-names>N. G.</given-names></string-name> and <string-name><surname>Scott</surname>, <given-names>J. G.</given-names></string-name> (<year>2010</year>). <article-title>The Horseshoe Estimator for Sparse Signals</article-title>. <source>Biometrika</source> <volume>97(2)</volume> <fpage>465</fpage>–<lpage>480</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1093/biomet/asq017" xlink:type="simple">https://doi.org/10.1093/biomet/asq017</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2650751">MR2650751</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_006">
<label>[6]</label><mixed-citation publication-type="journal"><string-name><surname>Efron</surname>, <given-names>B.</given-names></string-name> (<year>2010</year>). <article-title>The Future of Indirect Evidence</article-title>. <source>Statistical Science</source> <volume>25</volume> <fpage>145</fpage>–<lpage>157</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/09-STS308" xlink:type="simple">https://doi.org/10.1214/09-STS308</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2789983">MR2789983</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_007">
<label>[7]</label><mixed-citation publication-type="journal"><string-name><surname>Efron</surname>, <given-names>B.</given-names></string-name> and <string-name><surname>Morris</surname>, <given-names>C.</given-names></string-name> (<year>1972</year>). <article-title>Limiting the Risk of Bayes and Empirical Bayes Estimators-Part II: The Empirical Bayes Case</article-title>. <source>Journal of the American Statistical Association</source> <volume>67</volume> <fpage>130</fpage>–<lpage>139</lpage>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=0323015">MR0323015</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_008">
<label>[8]</label><mixed-citation publication-type="journal"><string-name><surname>Efron</surname>, <given-names>B.</given-names></string-name> and <string-name><surname>Morris</surname>, <given-names>C.</given-names></string-name> (<year>1975</year>). <article-title>Data Analysis using Stein’s Estimators and Its Generalizations</article-title>. <source>Journal of the American Statistical Association</source> <volume>70</volume> <fpage>311</fpage>–<lpage>319</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds106_ref_009">
<label>[9]</label><mixed-citation publication-type="book"><string-name><surname>Ferguson</surname>, <given-names>T.</given-names></string-name> (<year>1967</year>) <source>Mathematical Statistics. A Decision Theoretic Approach</source>. <publisher-name>Academic Press</publisher-name>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=0215390">MR0215390</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_010">
<label>[10]</label><mixed-citation publication-type="journal"><string-name><surname>Fúquene</surname>, <given-names>J.</given-names></string-name>, <string-name><surname>Pérez</surname>, <given-names>M. E.</given-names></string-name> and <string-name><surname>Pericchi</surname>, <given-names>L.</given-names></string-name> (<year>2014</year>). <article-title>An alternative to the Inverted Gamma for the variances to modelling outliers and structural breaks in dynamic models</article-title>. <source>Brazilian Journal of Probability and Statistics</source> <volume>28</volume>(<issue>2</issue>). <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/12-BJPS207" xlink:type="simple">https://doi.org/10.1214/12-BJPS207</ext-link>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/12-BJPS207" xlink:type="simple">https://doi.org/10.1214/12-BJPS207</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=3189499">MR3189499</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_011">
<label>[11]</label><mixed-citation publication-type="journal"><string-name><surname>Fúquene</surname>, <given-names>J. A.</given-names></string-name>, <string-name><surname>Cook</surname>, <given-names>J. D.</given-names></string-name> and <string-name><surname>Pericchi</surname>, <given-names>L. R.</given-names></string-name> (<year>2009</year>). <article-title>A Case for Robust Bayesian Priors with Applications to Clinical Trials</article-title>. <source>Bayesian Analysis</source> <volume>4</volume> <fpage>817</fpage>–<lpage>846</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/09-BA431" xlink:type="simple">https://doi.org/10.1214/09-BA431</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2570090">MR2570090</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_012">
<label>[12]</label><mixed-citation publication-type="journal"><string-name><surname>Gelman</surname>, <given-names>A.</given-names></string-name> (<year>2006</year>). <article-title>Prior Distributions for Variance Parameters in Hierarchical Models</article-title>. <source>Bayesian Analysis</source> <volume>1(3)</volume> <fpage>515</fpage>–<lpage>533</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/06-BA117A" xlink:type="simple">https://doi.org/10.1214/06-BA117A</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2221284">MR2221284</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_013">
<label>[13]</label><mixed-citation publication-type="book"><string-name><surname>Johnson</surname>, <given-names>N. L.</given-names></string-name>, <string-name><surname>Kotz</surname>, <given-names>S.</given-names></string-name> and <string-name><surname>Balakrishnan</surname>, <given-names>N.</given-names></string-name> (<year>1995</year>) <source>Continuous Univariate Distributions</source> <volume>2</volume>. <publisher-name>Wiley</publisher-name>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=1326603">MR1326603</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_014">
<label>[14]</label><mixed-citation publication-type="journal"><string-name><surname>Normand</surname>, <given-names>S. T.</given-names></string-name> and <string-name><surname>Shahian</surname>, <given-names>D. M.</given-names></string-name> (<year>2007</year>). <article-title>Statistical and Clinical Aspects of Hospital Outcomes Profiling</article-title>. <source>Statistical Science</source> <volume>22</volume>(<issue>2</issue>) <fpage>206</fpage>–<lpage>226</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/088342307000000096" xlink:type="simple">https://doi.org/10.1214/088342307000000096</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2408959">MR2408959</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_015">
<label>[15]</label><mixed-citation publication-type="journal"><string-name><surname>O’Hagan</surname>, <given-names>A.</given-names></string-name> and <string-name><surname>Pericchi</surname>, <given-names>L.</given-names></string-name> (<year>2012</year>). <article-title>Bayesian heavy-tailed models and conflict resolution: A review</article-title>. <source>Brazilian Journal of Probability and Statistics</source> <volume>26(4)</volume> <fpage>372</fpage>–<lpage>401</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/11-BJPS164" xlink:type="simple">https://doi.org/10.1214/11-BJPS164</ext-link>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/11-BJPS164" xlink:type="simple">https://doi.org/10.1214/11-BJPS164</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2949085">MR2949085</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_016">
<label>[16]</label><mixed-citation publication-type="journal"><string-name><surname>Perez</surname>, <given-names>M. E.</given-names></string-name>, <string-name><surname>Pericchi</surname>, <given-names>L. R.</given-names></string-name> and <string-name><surname>Ramirez</surname>, <given-names>I. C.</given-names></string-name> (<year>2017</year>). <article-title>The Scaled Beta2 Distribution as a Robust Prior for Scales</article-title>. <source>Bayesian Analysis</source> <volume>12</volume>(<issue>3</issue>) <fpage>615</fpage>–<lpage>637</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1214/16-BA1015" xlink:type="simple">https://doi.org/10.1214/16-BA1015</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=3655869">MR3655869</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_017">
<label>[17]</label><mixed-citation publication-type="journal"><string-name><surname>Pericchi</surname>, <given-names>L. R.</given-names></string-name> and <string-name><surname>Smith</surname>, <given-names>A. F. M.</given-names></string-name> (<year>1992</year>). <article-title>Exact and approximate posterior moments for a Normal location parameter</article-title>. <source>Journal of the Royal Statistical Society B</source> <volume>54</volume>(<issue>3</issue>) <fpage>793</fpage>–<lpage>804</lpage>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=1185223">MR1185223</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_018">
<label>[18]</label><mixed-citation publication-type="chapter"><string-name><surname>Polson</surname>, <given-names>N. G.</given-names></string-name> and <string-name><surname>Scott</surname>, <given-names>J. G.</given-names></string-name> (<year>2011</year>). <chapter-title>Shrink Globally, Act Locally: Sparse Bayesian Regularization and Prediction</chapter-title>. In <source>Bayesian Statistics 9</source> <fpage>501</fpage>–<lpage>538</lpage> <publisher-name>Oxford University Press</publisher-name>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1093/acprof:oso/9780199694587.003.0017" xlink:type="simple">https://doi.org/10.1093/acprof:oso/9780199694587.003.0017</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=3204017">MR3204017</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_019">
<label>[19]</label><mixed-citation publication-type="other"><string-name><surname>Stan Development Team</surname></string-name> (2023). <italic>Stan Modeling Language Users Guide and Reference Manual, version 2.32</italic>. <uri>https://mc-stan.org</uri>.</mixed-citation>
</ref>
<ref id="j_nejsds106_ref_020">
<label>[20]</label><mixed-citation publication-type="other"><string-name><surname>Stan Development Team</surname></string-name> (2025). <italic>RStan: the R interface to Stan</italic>. R package version 2.32.7. <uri>https://mc-stan.org/</uri>.</mixed-citation>
</ref>
<ref id="j_nejsds106_ref_021">
<label>[21]</label><mixed-citation publication-type="journal"><string-name><surname>Tremblay</surname>, <given-names>R. L.</given-names></string-name>, <string-name><surname>Pérez</surname>, <given-names>M. E.</given-names></string-name>, <string-name><surname>Larcombe</surname>, <given-names>M.</given-names></string-name>, <string-name><surname>Brown</surname>, <given-names>D.</given-names></string-name>, <string-name><surname>Quarmby</surname>, <given-names>J.</given-names></string-name>, <string-name><surname>Bickerton</surname>, <given-names>D.</given-names></string-name>, <string-name><surname>French</surname>, <given-names>G.</given-names></string-name> and <string-name><surname>Bould</surname>, <given-names>A.</given-names></string-name> (<year>2009</year>). <article-title>Population dynamics of <italic>Caladenia</italic>: Bayesian estimates of transition and extinction probabilities</article-title>. <source>Australian Journal of Botany</source> <volume>57</volume> <fpage>351</fpage>–<lpage>360</lpage>.</mixed-citation>
</ref>
<ref id="j_nejsds106_ref_022">
<label>[22]</label><mixed-citation publication-type="journal"><string-name><surname>Vehtari</surname>, <given-names>A.</given-names></string-name>, <string-name><surname>Gelman</surname>, <given-names>A.</given-names></string-name> and <string-name><surname>Gabry</surname>, <given-names>J.</given-names></string-name> (<year>2017</year>). <article-title>Practical Bayesian model evaluation using leave-one-out cross-validation and WAIC</article-title>. <source>Statistics and Computing</source> <volume>27</volume> <fpage>1413</fpage>–<lpage>1432</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1007/s11222-016-9696-4" xlink:type="simple">https://doi.org/10.1007/s11222-016-9696-4</ext-link>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1007/s11222-016-9696-4" xlink:type="simple">https://doi.org/10.1007/s11222-016-9696-4</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=3647105">MR3647105</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_023">
<label>[23]</label><mixed-citation publication-type="other"><string-name><surname>Vehtari</surname>, <given-names>A.</given-names></string-name>, <string-name><surname>Gabry</surname>, <given-names>J.</given-names></string-name>, <string-name><surname>Magnusson</surname>, <given-names>M.</given-names></string-name>, <string-name><surname>Yao</surname>, <given-names>Y.</given-names></string-name>, <string-name><surname>Bürkner</surname>, <given-names>P. -C.</given-names></string-name>, <string-name><surname>Paananen</surname>, <given-names>T.</given-names></string-name> and <string-name><surname>Gelman</surname>, <given-names>A.</given-names></string-name> (2025). <italic>loo: Efficient leave-one-out cross-validation and WAIC for Bayesian models</italic>. R package version 2.9.0. <uri>https://mc-stan.org/loo/</uri>.</mixed-citation>
</ref>
<ref id="j_nejsds106_ref_024">
<label>[24]</label><mixed-citation publication-type="journal"><string-name><surname>Watanabe</surname>, <given-names>S.</given-names></string-name> (<year>2010</year>). <article-title>Asymptotic Equivalence of Bayes Cross Validation and Widely Applicable Information Criterion in Singular Learning Theory</article-title>. <source>J. Mach. Learn. Res.</source> <volume>11</volume> <fpage>3571</fpage>–<lpage>3594</lpage>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=2756194">MR2756194</ext-link></mixed-citation>
</ref>
<ref id="j_nejsds106_ref_025">
<label>[25]</label><mixed-citation publication-type="journal"><string-name><surname>Yu</surname>, <given-names>C.</given-names></string-name> and <string-name><surname>Hoff</surname>, <given-names>P. D.</given-names></string-name> (<year>2018</year>). <article-title>Adaptive multigroup confidence intervals with constant coverage</article-title>. <source>Biometrika</source> <volume>105</volume> (<issue>2</issue>) <fpage>319</fpage>–<lpage>335</lpage>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1093/biomet/asy009" xlink:type="simple">https://doi.org/10.1093/biomet/asy009</ext-link>. <ext-link ext-link-type="doi" xlink:href="https://doi.org/10.1093/biomet/asy009" xlink:type="simple">https://doi.org/10.1093/biomet/asy009</ext-link>. <ext-link ext-link-type="uri" xlink:href="https://mathscinet.ams.org/mathscinet-getitem?mr=3804405">MR3804405</ext-link></mixed-citation>
</ref>
</ref-list>
</back>
</article>
