Stan code for the symmetric Modskurt with varying flattening / peakedness.

Examples

cat(modskurtp1r05_stan[["source_code"]])
#> 
#> real modskurtp1r05(real x, real H, real m, real s, real d) {
#>   return modskurt(x, H, m, s, 0.5, d, 1);
#> }