No flags found
Use flags to group coverage reports by test type, project and/or folders.
Then setup custom commit statuses and notifications for each flag.
e.g., #unittest #integration
#production #enterprise
#frontend #backend
dd7f78d
... +1 ...
6f60173
Use flags to group coverage reports by test type, project and/or folders.
Then setup custom commit statuses and notifications for each flag.
e.g., #unittest #integration
#production #enterprise
#frontend #backend
282  282  # For a stationary model, and if a valid k has been supplied, then calculate 

283  283  # the Kgaps model loglikelihood 

284  284  if (!x$trans && !missing(k) && length(k) == 1) { 

285    if (!is.wholenumber(k)  k < 0) { 

286    stop("k must be a positive integer") 

285  +  if (!is.numeric(k)  k < 0  length(k) != 1) { 

286  +  stop("k must be a nonnegative scalar") 

287  287  } 

288  288  # Call exdex::kgaps() to estimate the extremal index theta and store values 

289  289  # from which the loglikelihood can be calculated 
495  495  c(la, sc, xi) 

496  496  } 

497  497  
498    # ======================== Check for an integer number ====================== # 

499    
500    #' @keywords internal 

501    #' @rdname laxinternal 

502    is.wholenumber < function(x, tol = .Machine$double.eps^0.5) { 

503    return(abs(x  round(x)) < tol) 

504    } 

505    
506  498  # =============================== kgaps_loglik ============================== # 

507  499  # Included because this is not exported from exdex 

508  500  # The argument n_kgaps is not used here but it is included because it is 
6f60173
98c1d73
dd7f78d