Find Stan Code

This function looks for Stan code within a given R package a returns a list with the Stan code location within the package and the text of the code,

find_stan_code(pkgname = "staninside")

Arguments

pkgname

a string, the name of the package in which to look for the Stan code.

Value

a list with the Stan code location within the package and the text of the code,

Examples

find_stan_code(pkgname = "staninside")
#> $base_stan_location
#> /private/var/folders/0x/6bnjy4n15kz8nbfbbwbyk3pr0000gn/T/RtmpUyo7TA/temp_libpath1784956e03412/staninside/stan/functions/func.stan 
#>                                                                                                             "functions/func.stan" 
#>           /private/var/folders/0x/6bnjy4n15kz8nbfbbwbyk3pr0000gn/T/RtmpUyo7TA/temp_libpath1784956e03412/staninside/stan/test.stan 
#>                                                                                                                       "test.stan" 
#>          /private/var/folders/0x/6bnjy4n15kz8nbfbbwbyk3pr0000gn/T/RtmpUyo7TA/temp_libpath1784956e03412/staninside/stan/test2.stan 
#>                                                                                                                      "test2.stan" 
#> 
#> $stan_pkg_contents
#> $stan_pkg_contents$`functions/func.stan`
#> 
#> 
#> $stan_pkg_contents$test.stan
#> data{
#> 	int<lower=1> N;
#> 	real x [N];
#> 	real y [N];
#> }
#> parameters{
#> 	real alpha;
#> 	real beta;
#> 	real<lower=0> sigma;
#> }
#> model{
#> 
#> 	target += normal_lpdf(y | alpha + beta * x, sigma);
#> }
#> 
#> $stan_pkg_contents$test2.stan
#> data{
#> 	int<lower=1> N;
#> 	real x [N];
#> 	real y [N];
#> }
#> parameters{
#> 	real alpha;
#> 	real beta;
#> 	real<lower=0> sigma;
#> }
#> model{
#> 
#> 	target += normal_lpdf(y | alpha + beta * x, sigma);
#> }
#> 
#>