# context("Evaluates speed of some functions")
#
# load("C:/Users/nikos/Desktop/SAE_proj_data.RData")
#
# setwd("C:/Users/nikos/Desktop/SAE")
# Rprof("profiling")
#
# ELLsae2(model = model, surveydata = surveydata, location = "geo2_br", censusdata = censusdata, n_boot = 250, welfare.function = identity)
#
# Rprof(NULL)
#
# summaryRprof("profiling")
#
#
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.