Nothing
hstar = function(abdord,wtord,const,n,y){
m = length(abdord)
ic = 0
icm = 0
hstar = 0
while(ic < 1){
icm = icm + 1
if(abdord[icm] <= y){
hstar = hstar + wtord[icm]
} else {
ic = 2
}
if(icm == m){ic=2}
}
hstar = hstar/((n-1)*const)
hstar
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.