> kdd.train<-read.table("/home/ruben/public_html/data/bio_train.dat",header=F)
> sort(unique(kdd.train[,1]))
[1] 2 5 7 8 9 12 13 14 16 17 18 19 23 24 25 27 29 30
[19] 31 33 34 36 37 39 42 46 48 55 57 59 60 61 62 64 65 66
[37] 67 69 73 74 77 78 80 81 95 96 100 101 103 104 106 107 110 111
[55] 112 113 114 115 116 117 118 119 124 125 129 130 133 135 138 139 142 143
[73] 144 146 147 148 156 158 159 160 162 163 164 167 170 172 173 174 175 176
[91] 178 180 182 184 185 186 187 189 191 198 201 205 206 210 211 212 214 216
[109] 228 230 231 232 234 236 237 238 239 241 243 244 245 246 250 252 254 255
[127] 256 257 259 261 262 264 266 267 269 270 271 273 274 275 276 277 279 280
[145] 282 283 286 287 289 291 293 299 303
> table(kdd.train[,1],kdd.train[,3])
0 1
2 991 4
5 1057 2
7 952 23
8 623 2
9 910 1
12 934 24
13 1089 12
14 904 2
16 980 13
17 1156 1
18 1113 1
19 1108 3
23 927 8
24 928 1
25 793 24
27 813 7
29 983 5
30 748 1
31 1072 4
33 976 2
34 1142 1
36 800 26
37 979 1
39 1193 1
42 980 1
46 614 2
48 919 23
55 800 15
57 944 18
59 970 4
60 738 4
61 922 2
62 1013 5
64 632 3
65 873 11
66 1184 1
67 610 2
69 1085 14
73 1023 8
74 626 4
77 991 2
78 1000 1
80 939 5
81 1021 3
95 1119 1
96 972 2
100 768 28
101 788 5
103 1047 7
104 1000 5
106 963 1
107 1171 1
110 1122 10
111 992 1
112 903 31
113 671 6
114 843 2
115 740 21
116 950 19
117 1125 11
118 804 30
119 829 2
124 823 1
125 931 1
129 801 2
130 802 19
133 1089 1
135 1041 16
138 775 5
139 875 2
142 888 1
143 932 5
144 878 2
146 976 9
147 928 21
148 936 1
156 876 2
158 1124 4
159 847 1
160 1217 2
162 779 37
163 914 23
164 752 10
167 969 9
170 1024 12
172 917 9
173 1158 1
174 795 22
175 993 5
176 1047 1
178 988 25
180 1243 1
182 829 4
184 1115 15
185 968 17
186 795 22
187 853 1
189 933 14
191 906 2
198 798 48
201 1072 1
205 1207 7
206 980 1
210 956 6
211 1058 1
212 737 9
214 802 2
216 1065 3
228 1077 9
230 907 3
231 923 12
232 929 1
234 855 4
236 1048 2
237 810 3
238 811 50
239 928 21
241 901 9
243 930 11
244 785 32
245 948 6
246 768 33
250 964 1
252 1075 2
254 943 6
255 1076 7
256 929 13
257 1126 1
259 1022 3
261 1057 1
262 927 3
264 1058 5
266 981 10
267 987 1
269 1129 5
270 1054 2
271 957 49
273 1188 3
274 992 19
275 930 4
276 805 6
277 893 24
279 804 1
280 1101 1
282 1031 1
283 699 1
286 1140 5
287 866 9
289 897 5
291 994 5
293 972 1
299 986 1
303 998 22
> kdd.test<-read.table("/home/ruben/public_html/data/bio_test.dat",header=F)
> sort(unique(kdd.test[,1]))
[1] 1 3 4 6 10 11 15 20 21 22 26 28 32 35 38 40 41 43
[19] 44 45 47 49 50 51 52 53 54 56 58 63 68 70 71 72 75 76
[37] 79 82 83 84 85 86 87 88 89 90 91 92 93 94 97 98 99 102
[55] 105 108 109 120 121 122 123 126 127 128 131 132 134 136 137 140 141 145
[73] 149 150 151 152 153 154 155 157 161 165 166 168 169 171 177 179 181 183
[91] 188 190 192 193 194 195 196 197 199 200 202 203 204 207 208 209 213 215
[109] 217 218 219 220 221 222 223 224 225 226 227 229 233 235 240 242 247 248
[127] 249 251 253 258 260 263 265 268 272 278 281 284 285 288 290 292 294 295
[145] 296 297 298 300 301 302
>