Example

library(SRAT)

## Loading required package: np

## Nonparametric Kernel Methods for Mixed Datatypes (version 0.60-10)
## [vignette("np_faq",package="np") provides answers to frequently asked questions]
## [vignette("np",package="np") an overview]
## [vignette("entropy_np",package="np") an overview of entropy-based methods]

library(SKAT)

## Loading required package: Matrix

## Loading required package: SPAtest

data(SKAT.example)
attach(SKAT.example)

obj.skat <- SKAT_Null_Model(y.c ~ X, out_type = "C")
SKAT(Z, obj.skat, weights.beta = c(1, 1))$p.value

## [1] 0.868942

set.seed(123)
obj.srat <- srat.null(y.c, X)

## 
Multistart 1 of 1 |
Multistart 1 of 1 |
Multistart 1 of 1 |
Multistart 1 of 1 /
Multistart 1 of 1 |
Multistart 1 of 1 |
                   

srat.test(Z, obj.srat)

## [1] 0.7953798