--- kurtosis ---

Compute kurtosis of HESeries

kurtosis(...)

# S3 method for default
kurtosis(x = x, ...)

Arguments

series:

(HESeries)

Value

HESeries of length 1, containing kurtosis.

Examples

if (FALSE) {
params <- heaan_sdk.HEParameter("FGb", "real")
context <- heaan_sdk.Context(
           params,
           key_dir_path = "keys-real",
           load_keys = "all",
           generate_keys = FALSE)

series <- rnorm(100, 5, 10)
he_series <- HESeries.from_series(context, series)

encrypt(he_series)
res <- kurtosis(he_series)
decrypt(res)

res <- to_series(res)
}