条件にあう要素だけを置換する
alpha[which(alpha > 8)] <- NA