We will choose 5 largest beta values instead of true signals number largest beta in top n method, the denominator equals to 5.
Setting: row<-40, col<-100, num<-seq(5,25,5) str<-seq(0.1, 0.5, 0.1) times<-100
## 0.1 0.2 0.3 0.4 0.5
## 5 0.208 0.396 0.542 0.586 0.622
## 10 0.316 0.520 0.568 0.612 0.636
## 15 0.392 0.556 0.636 0.638 0.640
## 20 0.488 0.574 0.634 0.646 0.634
## 25 0.540 0.584 0.626 0.632 0.660## 0.1 0.2 0.3 0.4 0.5
## 5 0.170 0.426 0.640 0.890 0.928
## 10 0.312 0.586 0.816 0.886 0.950
## 15 0.424 0.698 0.806 0.864 0.914
## 20 0.518 0.736 0.838 0.862 0.838
## 25 0.622 0.778 0.826 0.846 0.854## 0.1 0.2 0.3 0.4 0.5
## 5 -0.038 0.030 0.098 0.304 0.306
## 10 -0.004 0.066 0.248 0.274 0.314
## 15 0.032 0.142 0.170 0.226 0.274
## 20 0.030 0.162 0.204 0.216 0.204
## 25 0.082 0.194 0.200 0.214 0.194