Function sparse_bayesian 

pub fn sparse_bayesian(
    phi: &[f64],
    m: usize,
    n: usize,
    y: &[f64],
    max_iter: usize,
    tol: f64,
) -> CsResult<SblResult>

Sparse Bayesian Learning EM iteration.