Mysqli num row返回不起作用(Mysqli num row returned is not working)
我想知道为什么它不适用于mysqli eventhou mysql_num_row正在工作。
if (mysql_num_rows($rows) > 0) { echo "<p>That name has been taken </p>"; }
那是mysql。 但是,我试图将其转换为mysqli。
if (mysqli_num_rows($rows) > 0) { echo "<p>That name has been taken </p>"; }
它应该显示在屏幕上,但事实并非如此。 并且没有显示任何错误消息。 或者我错过了什么? 有任何想法吗?
I'm wondering why it is not working for mysqli eventhou mysql_num_row is working.
if (mysql_num_rows($rows) > 0) { echo "<p>That name has been taken </p>"; }
That is mysql. But, Im trying convert it to mysqli.
if (mysqli_num_rows($rows) > 0) { echo "<p>That name has been taken </p>"; }
It supposed to be displayed on the screen but it's not. And there is nothing error message displayed. Or am I missing something? Any ideas?
原文:https://stackoverflow.com/questions/21472691
最满意答案
一种选择是将'data.frame'转换为'matrix',将其
melt
,并将不是'0'的'value'subset
。library(reshape2) subset(melt(as.matrix(df1)), value!=0)
要么
library(dplyr) library(tidyr) add_rownames(df1, 'rn') %>% gather(V1, V2, -rn) %>% filter(V2!=0)
One option is to convert the 'data.frame' to 'matrix',
melt
it, andsubset
the 'value' that are not '0'.library(reshape2) subset(melt(as.matrix(df1)), value!=0)
Or
library(dplyr) library(tidyr) add_rownames(df1, 'rn') %>% gather(V1, V2, -rn) %>% filter(V2!=0)
相关问答
更多-
使用tidyverse的解决方案。 我们可以将数据框和连接分散到原始数据框中。 dat2是最终输出。 library(tidyverse) dat2 <- dat %>% spread(POS, PRO) %>% left_join(dat, ., by = "ID") dat2 # ID PRO POS 1 2 3 4 # 1 1 A 1 A B C D # 2 1 B 2 A B C D # 3 1 C 3 A B C ...
-
我们可以转置数据集并将第一列转换为data.frame作为行名称。 m1 <- t(df1) d2 <- data.frame(r1= row.names(m1), m1, row.names=NULL) 编辑:在row.names调用中包含row.names参数(来自@Richard Scriven的评论) 或者@Ananda Mahto提到,我们可以使用names(df1)创建'r1'列,从而跳过在全球环境中创建对象的过程。 d2 <- data.frame(r1=names(df1), t(df1 ...
-
df <- as.data.frame(table) df$ID <- rownames(table) df <- as.data.frame(table) df$ID <- rownames(table)
-
在R中将行转换为2列(Converting rows to 2 columns in R)[2023-06-11]
没有可重复的例子,很难说,但你可能想看看?t example <- data.frame("sample"=c("RNA1","RNA2","RNA3"),"value"=rnorm(3,0,1)) example sample value 1 RNA1 0.7666676 2 RNA2 0.6275869 3 RNA3 -2.7513690 t(example) [,1] [,2] [,3] sample "R ... -
一种方法是使用select : select (select 93) as registered, (select 101) as authorized, (select 1) as rejected 您可以将实际查询放在占位符所在的位置。 One method is to just use select: select (select 93) as registered, (select 101) as authorized, (select 1) ...
-
使用来自“reshape2”的melt library(reshape2) melt(mydf, id.vars=c("Speaker", "Sex", "Group", "Repetition", "Accent", "Word")) # Speaker Sex Group Repetition Accent Word variable value # 1 105 M 1 1 N AILMENT 1 102.3103 # 2 ...
-
尝试 df[,cols] <- lapply(df[,cols],as.factor) 问题是apply()试图将结果绑定到一个矩阵中,这会导致将列强制转换为字符: class(apply(df[,cols], 2, as.factor)) ## matrix class(as.factor(df[,1])) ## factor 相反, lapply()对列表元素进行操作。 Try df[,cols] <- lapply(df[,cols],as.factor) The problem is th ...
-
如果您可以在有NA地方使用“0”,那么基准R中的xtabs就是完美的选择。 这将是基本的方法: xtabs(Value ~ Row + Col, myTable) # Col # Row 1 2 8 9 # 1 31 56 13 0 # 2 83 51 0 16 # 3 53 0 0 0 但是,这并不能弥补差距,因为并非所有因素水平都可用。 您可以单独或即时执行此操作,如下所示: xtabs(Value ~ factor(Row, sequence(max(Row))) ...
-
如何将表转换为列R(How to Convert Table Into Columns R)[2022-10-26]
一种选择是将'data.frame'转换为'matrix',将其melt ,并将不是'0'的'value' subset 。 library(reshape2) subset(melt(as.matrix(df1)), value!=0) 要么 library(dplyr) library(tidyr) add_rownames(df1, 'rn') %>% gather(V1, V2, -rn) %>% filter(V2!=0) One optio ... -
这是你如何做到的。 # create the data frame df <- data.frame(Id=c(1,1,1,2,2), Action=c("click", "view", "data", "click", "click")) df #> Id Action #> 1 1 click #> 2 1 view #> 3 1 data #> 4 2 click #> 5 2 click # Use reshape2::dcast library(reshape2) d ...