R/func_int.R

func_int <-
function(a){
  if(a[length(a)]!=0){a[1:(length(a)-1)]=-a[length(a)]} 
  return(a)}

Try the grplassocat package in your browser

Any scripts or data that you put into this service are public.

grplassocat documentation built on May 2, 2019, 8:18 a.m.