This function creates 0-1 indicators for a given threshold y0 and vector y
indicat(y, y0)
y
vector y
y0
threshold value y0
val