cbind

问题 I used the matchit() and Method="nearest" . But when I try to save the output into a data.frame by match.data() , the error shows up: Error in cbind_all(x) : Argument 2 must have names. My Code: a = matchit(Y ~ Year + IndustryCode + ROA + Debt, data=data, method="nearest", ratio=1) b = match.data(a) Year variable = 2003, 2004 etc. IndustryCode = A02, A21 etc. other variables are numeric. Those are the warnings after matchit() : Warning messages: 1: glm.fit: fitted probabilities numerically 0

问题 I'm new with R and I've an issue So my issue is : I've multiples tables ex: 10 , also different list from kmeans results related to this tables (10). So I want use cbind in order to add each cluster to its table : Ex: NEW_table1<- cbind(table1,kmeans_table1$cluster) NEW_table2<- cbind(table2,kmeans_table2$cluster) ... I've tryd with this code but a get an error for (i in 1:10) { assign(paste0("NEW_table", i)<-cbind(as.name(paste0("filter_table",i)),Class=(i$cluster) )) } > Error in i$cluster

问题 I have 100 numeric vectors named sim1 to sim100 in my workspace, all of the same length (18). I'm trying to find a way to identify them and cbind them to create a data frame of 18 rows and 100 columns. I can easily create a character vector of length 100 that contains the names of the vectors: myvector<-ls() myvector<-[grep("sim",myvector)] ..but I'm stuck on how to create a list of the objects themselves that I assume I could then use with do.call. Any suggestions please? 回答1: You can try do

问题 This question already has an answer here : Combine two lists of dataframes, dataframe by dataframe (1 answer) Closed 5 years ago . I have two lists of data.frames. Both lists have the same length and contain fitting data.frames in their according list elements. So the scenario looks like this dfa = data.frame(a=1:3, b = letters[1:3]) dfb = data.frame(x=runif(3)) a = replicate(3, dfa, simplify = FALSE) b = replicate(3, dfb, simplify = FALSE) One obvious solution is: lapply(seq_along(a),

问题 I'm trying to join matrices stored in nested lists and place them in a new list. For example, if I have a list of fruit, I would like to take various matrices stored under Kiwi , and join them together as one matrix in a new list. This will generate something that looks like my data: #Define some important things Fruits = c('Mango', 'Kiwi') Attr = c('Size', 'Shape') #generate empty lists MyFruitList <- lapply(Fruits, function(q) { EmptySublist <- (setNames(vector("list", length(Fruits)), Attr

问题 Not sure why this is happening. I have a dataframe df2 with the variables below: EVTYPE TOTAL_FATALITIES TOTAL_INJURIES (fctr) (dbl) (dbl) 1 TORNADO 5633 91346 2 EXCESSIVE HEAT 1903 6525 3 FLASH FLOOD 978 1777 4 HEAT 937 2100 5 LIGHTNING 816 5230 6 TSTM WIND 504 6957 > df2$TOTAL_FATALITIES [1] 5633 1903 978 937 816 504 470 368 248 224 206 204 172 160 133 127 103 101 101 > df2$EVTYPE [1] TORNADO EXCESSIVE HEAT FLASH FLOOD HEAT LIGHTNING [6] TSTM WIND FLOOD RIP CURRENT HIGH WIND AVALANCHE [11]

问题 I have two data frames with different number of columns and rows. I want to combine them into one data frame. > month.saf Name NCDC Year Month Day HrMn Temp Q 244 AP 99999 2014 2 1 0 12 1 245 AP 99999 2014 2 1 300 12.2 1 246 AP 99999 2014 2 1 600 14.4 1 247 AP 99999 2014 2 1 900 18.6 1 248 AP 99999 2014 2 1 1200 18 1 249 AP 99999 2014 2 1 1500 13.6 1 250 AP 99999 2014 2 1 1800 11.8 1 251 AP 99999 2014 2 1 2100 10.8 1 252 AP 99999 2014 2 2 0 8.4 1 253 AP 99999 2014 2 2 300 8.6 1 254 AP 99999

问题 I need to repeatedly add a vector to a matrix. Both take on different lengths everytime I do this. The complete matrix is then used for further analysis (plotting, t-test) Three months ago this code worked: mlen <- max(length(matrix), length(vector)) length(maxtrix) <- length(vector) <- mlen matrix <- cbind(matrix, vector) I don't use any specific packages for that. Data input is unchanged a csv file. Now I have either of the following the issues: a) the unequal length function doesn't work

问题 I've found a work around solution to a question I posted based on @Ryan's recommendation, given by this code: for (i in seq_along(url)){ webpage <- read_html(url[i]) #loop through URL list to access html data fac_data <- html_nodes(webpage,'.tableunder') %>% html_text() fac_data1 <- html_nodes(webpage,'.tableunder1') %>% html_text() fac_data <- c(fac_data, fac_data1) #Store table data on each URL in a variable x <- fac_data %>% matrix(ncol = length(headers[[i]]), byrow=TRUE) #make matrix to

问题 I've some problems with my data frame in R. My data frame looks something like this: ID TIME DAY URL_NAME VALUE TIME_SPEND 1 12:15 Monday HOME 4 30 1 13:15 Tuesday CUSTOMERS 5 21 1 15:00 Thursday PLANTS 8 8 1 16:21 Friday MANAGEMENT 1 6 .... So, I want to write the rows, containing the same "ID" into one single row. Looking something like this: ID TIME DAY URL_NAME VALUE TIME_SPEND TIME1 DAY1 URL_NAME1 VALUE1 TIME_SPEND1 TIME2 DAY2 URL_NAME2 VALUE2 TIME_SPEND2 TIME3 DAY3 URL_NAME3 VALUE3 TIME