Итак, вот моя проблема: у меня есть код, который извлекает некоторые данные из 29 файлов Excel и организует все, что помечено как «sw», в одну переменную, а все, что помечено как «rep», в другую переменную:
file.number <- c(1:29)
data <-setNames(lapply(paste0(file.number,".csv"),read.csv,stringsAsFactors=FALSE),paste0(file.number,".data"))
n <- 1:29
df <- data.frame(RT=1:100,rep.sw=sample(c("sw","rep",100,replace=TRUE)))
sw <- lapply(data[n],function(df) with(df,na.omit(RT[rep.sw=="sw"])))
rep <- lapply(data[n],function(df) with(df,na.omit(RT[rep.sw=="rep"])))
Затем я хочу узнать средства и стандартные отклонения этих файлов, за исключением случаев, когда я использовал mean (sw), он говорит мне, что «аргумент не является числовым или логическим: возвращается NA». если я открываю "sw" или "rep", я получаю что-то вроде этого:
$ 28.data [1] 0,8476 0,8362 0,5442 0,6987 0,7859 0,7396 1,0230 1,2446 0,8683 0,6049 0,6355 0,7421 0,9611 [14] 0,8074 0,9847 0,6291 1,0054 0,6969 0,7265 0,6452 0,7258 0,8099 0,6202 0,7873 0,6800 0,6932 [27] 1,6124 0,635 0,6202 0,7873 0,6800 0,6932 [27] 1,6124 0,65 0,65 0,65 0,65 0,65 0,64 0,65 0,65 0,65 0,65 0,65 0,65 0,65 0,65 0,65 [40] 0,3885 0,6794 0,7635 0,7180 0,4817 0,6300 0,7036 0,6592 0,5893 0,7757 0,7562 0,9872 1,2523 [53] 0,6881 0,9567 1,2612 0,6691 1,0147 0,7342 0,5541 0,7812 0,8366 0,6086 0,3273 2,7230 1,174600 [66] 0,6796 0,5465 0,7613 0,7613 0,73 0,6796 0,5465 0,7613 0,76 ] 0,7606 0,9773 0,7741 0,5647 0,8278 0,5899 0,5874 0,7234 0,5261 0,5980 0,5951 attr (, "na.action") [1] 1 3 4 5 7 9 10 12 14 16 18 20 22 24 26 27 29 31 33 35 37 39 41 [24] 42 44 46 47 49 51 53 55 57 59 61 63 65 67 69 71 73 75 77 79 81 83 85 [47] 86 88 90 92 94 95 97 99 101 102 103 105 107 109 111 112 114 116 118 119 121 123 125 [ 70] 126 128 130 132 13 4 135 136 137 139 141 143 145 147 149 151 153 155 157 159 161 163 165 167 [93] 169 171 173 174 176 178 179 181 183 185 187 189 191 193 195 attr (, "класс") [1] "опустить"
$ 29.data [1] 0,6426 0,5946 0,6903 0,6798 0,7299 0,8263 0,6023 0,6095 0,5822 0,7946 0,5403 0,5716 0,6120 [14] 0,6508 0,5124 0,4831 0,5197 0,5750 0,5578 0,5993 0,7203 0,5777 0,5906 0,4900 0,5620 0,7961 [27] 0,5908 0,48905 0,6961 0,5902 0,48 0,68 [40] 0,5033 0,5314 0,5208 0,5375 0,6032 0,5255 0,5439 0,4703 0,5123 0,6321 0,5057 0,5668 0,5387 [53] 0,5980 0,5555 0,5745 0,5961 0,5186 0,5541 0,5976 0,9179 0,6375 0,5769 0,5807 0,6663 0,6177 [66] 0,5507 0,4639 0,8702 ] 0,5649 0,6674 0,5247 0,4840 0,5376 0,5241 0,6764 0,5281 0,6310 0,6082 0,5833 0,5424 0,5984 [92] 0,6329 attr (, "na.action") [1] 1 3 5 7 9 11 12 14 16 18 20 21 23 24 25 27 28 30 32 34 36 38 39 [24] 41 43 45 47 49 50 52 53 54 56 58 60 62 63 65 67 69 70 72 73 74 76 78 [47] 79 81 82 84 85 87 89 91 93 95 97 99 101 102 104 106 108 109 111 112 114 116 11 8 [70] 120 122 123 125 127 129 131 133 135 137 139 141 143 145 146 148 150 152 153 155 157 159 161 [93] 163 164 166 167 168 170 172 174 175 177 179 180 182 184 186 187 189 191 193 195 197 199 201 [116] 203 205 206 208 210 212 213 attr (, "класс") [1] "опустить"
Любая помощь будет принята с благодарностью!
