我试图在R中创建一个虚拟变量，其中分类变量“位置”等于‘第一个基数’或‘第二个基数’的1。我知道如何做到这一点，只有一个像‘一垒’，但我不知道如何做它，包括二垒作为选项。我该怎么写这段代码？
baseball$POS <- ifelse(baseballdf$position == "first base", 1, 0)
浏览 3提问于2019-12-12得票数 0
回答已采纳
1回答
我试图创建一个热图，其中单元格的颜色不是相对于网格中的其他值，而是链接到绝对值(有点像excel中的单元格格式，例如，在0.20到0.25之间的值是绿色的)。我一直在玩R包superheat，但我仍然不清楚如何提供这样的映射。关于如何做到这一点，有什么建议吗？最好是使用过热，但提示如何通过其他软件包做它也很好。
更新:例如，使用mtcar数据集，我们获得
superheat(mtcars,
X.text = as.matrix(mtcars),
legend.breaks = c(min(mtcars), 0, max(mtcars)))
将一个新行添加
浏览 6提问于2022-05-04得票数 0
回答已采纳
我想知道是否有一种方法可以使用stargazer()按多个类别(组)创建一个像样的汇总统计表。我从下面的代码开始，但我不知道如何从这里前进。
library(mtcars)
mtcars2 <- within(mtcars, {
vs <- factor(vs, labels = c("V", "S"))
am <- factor(am, labels = c("automatic", "manual"))
cyl <- ordered(cyl)
gear <- ordered(ge
浏览 3提问于2021-12-10得票数 1
1回答
我有一个spark数据帧，我正在使用sparklyr操作，它看起来如下所示： input_data <- data.frame(id = c(10,10,10,20,20,30,30,40,40,40,50,60,70, 80,80,80,100,100,110,110,120,120,120,130,140,150,160,170),
date = c("2021-01-01","2021-01-02","2021-01-03","2021-01-01","2021-01-02",
浏览 24提问于2021-08-30得票数 0
回答已采纳
3回答
嗨，我有一个包含多个列的数据集，其中包含NA或"Y“。我想让这些值分别为0和1。
我对R相当陌生，并试图确定循环这些变量并对其进行重新编码的最佳方法。
STATE<-c(NA, "WA", "NY", NA, NA)
x<-c(NA,"Y",NA,NA,"Y")
y<-c(NA,NA,"Y",NA,"Y")
z<-c("Y","Y",NA, NA, NA)
mydata<-data.frame(x,y,z)
我有一个很大的数据
浏览 2提问于2017-04-03得票数 0
回答已采纳
1回答
我在为一些r码而挣扎。在我的数据集中，我有一系列关于药物使用的变量-- drug_mar，drug_coc，drug_her，drug_met，等等。我试图创建一个新的多物质使用变量-- drug_poly。问题是，我似乎无法得到一个有效的代码，它基本上要求“如果选择了多个药物变量，那么drug_poly ==1”.我觉得我可以用SPSS做这个，但我找不到正确的r包或正确的语法。有什么想法吗？
这是我计划要写的代码.但是，我仍然没有定义如何创建drug_poly变量。
df <- df %>%
mutate(drug_type = ifelse(drug_ma
浏览 4提问于2021-01-15得票数 0
回答已采纳
我有一个函数，我想用某个参数作为点点参数(col)调用，不幸的是，这个函数已经有三个名为col (colNonSig、colSig和colLine)的变量，因此优先匹配这些变量：
正如上面的文档所提到的，我想通过col传递到对plot的底层调用。
浏览 8提问于2022-10-14得票数 0
回答已采纳
1回答
您好，我有一个数据集，如下所示
bankname bankid year totass invloc1 invamt1 invloc2 invamt2 invloc3 invamt3
Bank A 1 1881 244789 Philadelphia 7250.32 New York 20218.20 Philadelphia 29513.4
Bank B 2 1881 195755 Pittsburgh 10243.60 NA 1851.51 NA NA
Bank C 3 1881
浏览 4提问于2014-10-01得票数 0
ggplot(data = house,
mapping = aes(x = GrLivArea,y = SalePrice))+
geom_point(size=2, shape = 16, mapping = aes(color = ifelse(YearBuilt<=1908,"purple",
ifelse(YearBuilt>1908 & YearBuilt<=1943,"orange",
ifelse(Year
浏览 4提问于2022-10-17得票数 0
回答已采纳
我正在尝试建立一个简单的模型，从高处预测性。我知道下面的内容很幼稚，但是我遇到了一个R语法问题。首先，我为每个身高组创建了一个女性概率数据。然后，我要查找这个模型，根据一定的限制为测试数据分配性别。
library(tidyverse)
library(dslabs)
library(caret)
# rm(list=ls())
ind <- createDataPartition(heights$height,1, p=0.5, list = FALSE)
test_height <- heights %>% slice(ind)
train_height <- h
浏览 1提问于2022-04-09得票数 0
我有一个来自一项调查的数据集，由于调查的设置方式，它有几个类似的变量。例如，我对2016年中苏打水的价格有20个不同的变量。一个设施只有一个中等苏打问题的回答(这取决于它们是什么类型的设施)。我想在R中将这些变量加在一起，以获得所有工具的一个中等苏打变量。下面是数据外观的一个示例。
Q5a_MediumSoda_Coffee: 2.25, 3.35, NA, NA, NA, NA, NA...
Q6a_Mediumsoda_Burgers:NA,NA, 2.50, NA, NA, NA, NA...
Q7a_MediumSoda_Thai:NA,NA,NA,NA,2.30, 1.50, 2.7
浏览 23提问于2017-08-24得票数 0
Noob问题，但是我如何创建一个独立的变量，它是由其他变量的特定属性形成的？例如，我试图在“区域”变量中找到“民主”变量得分为“3”的亚洲国家。我想创建一个名为"asia3“的变量，选择那些民主得分为3分的亚洲国家。
浏览 4提问于2022-02-19得票数 0
2回答
我创建了一个名为username.github.io (使用我的用户名)的存储库。这个案子(a-A)重要吗？我用小写字母做的，然后把它重命名为精确的外壳。
如果我必须使用"username.github.io“来创建存储库，如何设置多个页面？
我要去，我什么也没看到。
浏览 3提问于2014-09-28得票数 0
2回答
我有一个变量glyhb，它是从2.85到16.11的数字。如何将其转换为类别变量，其中5.7以下的都是一个类别，5.7到6.4的都是另一个类别，第三个是6.5或更高的类别。
浏览 0提问于2016-04-30得票数 0
2回答
我有一个数据(lmr_sak)，从1993-2019年挪威上诉法院的刑事案件判决。2015年10月1日，一部新的刑法(2005年塞塞洛芬，不是一个错误，它用了10年时间才生效)取代了1902年的旧刑法。
我想创建一个模型来判断判决是采用旧的还是新的法律。首先，我根据日期创建了一个虚拟模型：
lmr_sak$dato <- as.Date.factor(lmr_sak$dato)
lmr_sak <- lmr_sak %>%
mutate(strl1902 = ifelse(dato > "1993-01-04" & dato <
浏览 1提问于2022-04-05得票数 1
假设我有以下数据帧(真正的数据帧是10个labelx列)： id <- c(1,2,3,4,5,6,7,8)
label1 <- c("apple","shoe","banana","hat","dog","radio","tree","pie")
label2 <- c("apple","sneaker","fruit","beanie","pet","ipo
浏览 61提问于2019-02-27得票数 2
回答已采纳
我有两个不同的坐标，分别命名为x和y。我想创建第三个变量，告诉他们在哪个cadran (四分之一)中。在我的ifelse语句中，我不知道如何使用范围作为示例，x应该是25>x>0和25>y>0，而不仅仅是x>0和y>0。另外，因为我想用多个cadran创建这个变量，所以我希望有多个不会互相擦除的ifelse语句。最后，我的第三列给出了这对x和y中每一对的cadran 到目前为止，这是我的代码，我在这里遇到了一些障碍 library(dplyr)
x <- c(3,-2, 35, -4, 34, 20, 45)
y <- c(0, 2, 33,
浏览 15提问于2020-10-21得票数 1
回答已采纳
我写这封信是为了询问通常的创建或二进制化虚拟变量的方法。
我引用了很多不同的书，有两种方法：
在包dummyVars下使用caret或使用ifelse
有人能分辨出不同之处吗？
浏览 2提问于2021-07-06得票数 0
回答已采纳
我已经创建了一个基本的统计实验，其中我对treat变量使用了随机抽样，结果是一个包含d，b，a，c，a，d，b，c的列…等(R代码复制如下)。我现在被告知，我需要列出的名字不是d，b，a，c，而是苹果而不是a，香蕉而不是b，胡萝卜而不是c，榴莲代表d。我很难找到关于如何做到这一点的信息。有没有人能帮帮忙？
> block=rep(1:8,rep(4,8))
> treat=factor(c(sample(letters[1:4])))
> variable1=Data[order(Data$variable1),]
> Animals=data.frame(variab
浏览 0提问于2014-03-13得票数 0
我有两个不同长度的数据帧，都是字符串。让我们说：
NameDF <- data.frame (names = c("Jane","John"))
JobDF <- data.frame (occupation = c("Frank is a teacher","Jane is a doctor","John cooks part-time","Mike was a musician","Jane is an engineer"))
在真实的数据集中，NameDF是用户
浏览 7提问于2021-05-11得票数 0
回答已采纳
我试图创建的变量称为"high“。
如果totexp (已经在dataframe中)高于totexp的中位数，它将接受"1“的值。
如果totexp (它已经在dataframe中)低于totexp的中位数，它将接受"0“的值。
下面是我用来创建变量的代码。
high = rep(0, nrow(df))
high[totexp > median(df$totexp)] = 1
如何将其添加到dataframe中？
谢谢!
浏览 3提问于2021-11-10得票数 0
回答已采纳
1回答
我试图绘制矩阵Y的前两列，并根据它们在我的数据集的第12列中所属的组，分配不同的数据点、不同的形状和颜色。下面是我的代码：
X <- as.matrix(course[,1:11])
S <- cov(X)
l <- eigen(S)$values
e <- eigen(S)$vector
Y <- X %*% e
plot(Y[,1:2],
xlab = "PC1",
ylab = "PC2",
pch = c(1, 17, 8)[as.numeric(course[,12])], #
浏览 2提问于2013-11-11得票数 1
4回答
多重继承问题Swift
、、、
我在Swift中遇到了多重继承的问题，这就是我的情况：
在我的应用程序中，我有各种UITableViewController和UIViewController，但两者都必须有不同的字段，例如一个数组和两个字符串。出于这个原因，我想创建一个超类'SuperClassTest'，并且all UITableViewController和UIViewController继承它，如下所示：
class SuperClassTest {
var stringOne:String?
var stringTwo:String?
}
我的问题是，例如，当我创建一个必须有这些字段
浏览 6提问于2015-12-31得票数 0
回答已采纳
小提琴：
我正在尝试对我们的日志编写一个正则表达式，以匹配下面文本的粗体部分。
stage\nmyenv-01 MySearchTests {( (MySearchTests测试) \nmyenv-01 MySearchTests tool\nmyenv-01 \nmyenv-01 Tests.MyPortal.MakeAWidgetTests > Validate WidgetUser@email.com )允许创建通过\nmyenv-01 Tests.MyPortal.MakeAWidgetTests \nmyenv-01 Tests.MyPortal.MakeAWidgetTes
浏览 2提问于2018-11-26得票数 0
回答已采纳
1回答
作为练习，我必须创建一个变量($dep)的所有不同值的向量。这个向量可以用代码创建:唯一($dep)
我需要使用for循环来创建这个向量，我编写了一个循环，它没有给出正确的结果，但我不明白问题出在哪里：
v<-vector()
for (i in seq_along(a$dep)){
v<-ifelse(a$dep[i] %in% v, v,c(v,a$dep[i]))
}
非常感谢你的帮助！
浏览 2提问于2021-04-05得票数 2
回答已采纳
2回答
我有一个大约50,000 x 200的数据帧。列名有4种不同的类型，末尾的数字范围为1-50 (store1、price1、time1、rate1、store2、price2、time2、rate2、...、store50、price50、time50、rate50)。我试图根据每一列的值创建虚拟变量，但在让R处理循环中的列名时遇到了问题。
store1 price1 time1 rate1 store2 price2 time2 rate2 ....
A 55.55 08:09 1.44
浏览 0提问于2011-12-23得票数 2
回答已采纳
我想在ggplot2中创建一个线条图，根据X轴值，面板背景色在白色和灰色之间交替。
在这种情况下，DOY是一年中的一天，我希望它能够在每一天之间进行转换。
我包括了一些基本的示例代码。基本上要在DOY 1-2之间是白色的，DOY 2-3是灰色的，等等。
如能提供任何帮助，我们将不胜感激。
DOY <- c(1, 2, 3, 4, 5)
Max <- c(200, 225, 250, 275, 300)
sample <- data.frame(DOY, Max)
ggplot()+
geom_line(data=sample, aes(x=DOY, y=Max), co
浏览 1提问于2020-05-04得票数 0
回答已采纳
3回答
基于指标的条件和
、、
我有一个这样的数据框架：
A B Ind
1 10 8 1
2 9 10 2
3 7 1 2
4 19 20 1
5 . . .
如何根据Ind值对列求和？如果为Ind==1，则从列A求和；如果为Ind==2，则从列B求和。例如，前4行的输出应该是10+10+1+19=30，其中第一个10在A中，第二个10在B中，第三个1在B中，第四个19在A中。
浏览 0提问于2013-03-21得票数 3
回答已采纳
我试图通过在列中查找值来有条件地提取行，并打算根据该行中是否出现了值来添加新的二进制值列。对我来说，这个想法很简单，我使用了函数来完成这个任务，但是我有以下错误：
As.logical中的错误(测试)：不能强迫类型‘闭包’到‘逻辑’类型的向量
可复制数据
这是。
基本上，我需要在两个不同的列中签入值，然后将二进制值分配给新添加的列。以下是我的快速尝试：
f= read.csv("mydf.csv", header = TRUE)
df_new <- f %>% filter(str_detect(lelvel_care, "Intensive"
浏览 1提问于2020-03-23得票数 1
回答已采纳
我对记者的理解不是很好，所以我在创作他们时遇到了麻烦。然而，我认为这个应该行得通。我已经使用滑块将食品质量随机设置为0-1之间的随机值，根据我的理解，您可以使用let将变量设置为新的局部变量。 to-report food-quality-level
ifelse food-quality > 0.6
[let food-value high-quality]
[let food-value low-quality]
report food-quality-level
end 然而，我得到了一个错误:没有定义任何低质量的东西。应该如何纠正这一点？那么在程序中，我是不是要
浏览 13提问于2020-11-09得票数 0
我有一个数据，看起来像这样，但有20个级别。
df <- data.frame(
x = factor(c("alpha","beta","gamma","delta")),
y = factor(c("alpha","beta","gamma","delta")),
z = factor(c("alpha","beta","gamma","delta"))
我想根据其他三列
浏览 0提问于2017-02-27得票数 1
回答已采纳
我有正值和负值，我想用ggplot2把它们放在条形图中。当条形图/值为正时，我只想显示较高的标准误差，而当条形图/值为负值时，我只显示较低的标准误差。下面是计算均值、方差、柱状图的可重复代码： dat <- data.frame(
Flyway = c("A", "A", "A", "A", "M", "M", "M", "M", "C", "C", "C", "C", "P"
浏览 18提问于2021-09-02得票数 0
在下面的示例中，我创建了两系列点，并使用ggplot2绘制它们。我还根据它们的值强调了几点
library(ggplot2)
x <- seq(0, 6, .5)
y.a <- .1 * x -.1
y.b <- sin(x)
df <- data.frame(x=x, y=y.a, case='a')
df <- rbind(df, data.frame(x=x, y=y.b, case='b'))
print(ggplot(df) + geom_point(aes(x, y), color=ifelse(df$y<0, &
浏览 1提问于2013-04-04得票数 10
回答已采纳
这是我正在使用的示例数据帧：
numbers <- data.frame(value=c(-5000,1,2,100,200,300,400,500, 1000, 2000, 10000, 12000))
我希望在这个数据框中创建一个名为"output“的新列，其中包含以下值：
如果值在1和10000之间，则值与列“-Same”中的值相同
-10000如果" value“列的值大于10000，并且
如果列-1 \f25 " value“-1中的值小于1
新列“output”中的期望输出: 1,1,2,100,200,300,400,500,1000,2000,10
浏览 18提问于2021-12-04得票数 1
4回答
以下哪种方法在子类中是合法的？
、、、、
我对如何在子类中创建方法感到困惑。我的头撞在砖墙上，甚至不知道该怎么说这个问题。
import java.io.*;
public class A {
public double method1(double x, double y) { return 1.0; }
}
class B extends A {
//subclass method to be placed after this line
}
public double method1(double x, double y) { ... }
public int method1(double x, dou
浏览 5提问于2013-11-10得票数 0
回答已采纳
2回答
我有一个数据集，其中包含两个变量x =事件号& y =分析幅度。我试图在ggplot2中创建一个散点图，其中所有的> 3000点都用一种颜色着色，而所有的点-- < 3000 --都是不同的颜色。
我可以得到图和改变所有数据点的颜色，但不知道如何定义一个基于值阈值的配色方案。
下面是我使用的数据示例：
dat <- data.frame(x=c(399, 16022, 14756, 2609, 1131, 12135,
7097, 12438, 12604, 14912, 11042,
浏览 1提问于2014-04-05得票数 6
回答已采纳
我试图根据同一个data.frame的第三列(id)的值，将data.frame列分别与标量A和标量B相乘。不知何故，我有一些(排序，排序？)问题-到目前为止，结果肯定是错误的。下面是几次尝试：
mydf$result = subset(mydf,myid==123,multiplyme)*0.6 +
subset(mydf,myid==124,,multiplyme)*0.4
我也尝试在%语法中使用%，但也没有成功。例如，我知道我可以使用MySQL并连接到R，但在这种情况下，我只想使用(basic) R或plyr，至少在这里。对于那些更喜欢代码而不是我的blabla的人，这里是我如何用SQL
浏览 0提问于2010-07-19得票数 1
回答已采纳
1回答
因为我现在正在学习C语言，所以我希望能够在XCode中创建一个“项目”文件夹来保存我创建的所有小文件，这些小文件是我为了学习不同的东西而创建的。比如HelloWorld.c IfElse.c WhleLoop.c，但是我有一个很大的问题。我不能运行这些不同的main文件而不得到下面的错误...
duplicate symbol _main error:
linker command failed with exit code 1 (use -v to see invocation)
做这件事最简单的方法是什么？我只想在Xcode中打开一个项目，以便能够非常容易地引用我以前的文件，并在真正进入
浏览 1提问于2013-06-26得票数 0
回答已采纳
我是R的新手，并且正在使用Stata。我可以在Stata中使用foreach和forvalue循环这些变量。
我想在列上循环，而不是在行上循环。例如，我有一个名为var1、var2、var3的列。数据如下：
var1 var2 var3
1 1 1
2 999 3
999 2 999
我想重新编码所有的"999“的变量中的值丢失。在斯塔塔，我可以
forvalue i = 1(1)3{
replace var`i' ="NA" if var`i' =="999"
}
所以，我的结果就像
var1
浏览 0提问于2019-05-29得票数 3
回答已采纳
2回答
假设我们有一个数值变量age，它有时会丢失。在使用它来预测其他变量时，我们希望考虑到非线性，因此我们创建了age_factor。我们应该被动地归因于age_factor：
但是语法是如何工作的呢？类似于：
method["age_factor"] <- "~ 18_34 if age <= 34,
35_49 if age <= 49... "
谢谢！
浏览 28提问于2021-10-02得票数 0
2回答
我正在尝试弄清楚如何在dplyr中创建使用不同行信息的汇总统计信息
Subject BinLab mean.RT
s001 Deviant_RT 533.8115
s001 Standard_RT 508.2450
s002 Deviant_RT 465.5538
s002 Standard_RT 425.0351
基本上，我想创建一个按主题分组的数据框，并给出Deviant_RT和Standard_RT的mean.RT之间的区别
这是我尝试过的：
RTDataDifferenceWave <- RTData %>%
浏览 0提问于2018-10-06得票数 1
1回答
我有个阿帕奇人在AWS弹力豆杆下跑。我有几个不同的域，我希望它们都以一个特定的域名结束，在HTTPS中。
从其他域(如https://domain1.com重定向到https://maindomain.com )返回一个SSL证书错误。
在apache中，我有两个虚拟主机配置，一个用于*:80，另一个用于*:443。这两个都是为maindomain.com设置的。它们是用certbot创建的。
什么是最好的做法，使这个工作对所有其他领域？我想我需要为每个域设置一个VirtualHost，但是应该如何配置它才能让它与重定向一起工作呢？
显然，以下示例无法工作，因为它返回SSL错误：
<If
浏览 0提问于2021-06-08得票数 0
回答已采纳
1回答
compare1:[Int] -> Book
Compare1[x] =([x] == [x])
Test1 = scenario do
Debug(compare1 [11,12])
上面的代码有什么问题，为什么会出现错误daml:44-1-30:Non-exhaustive patterns in function compare1？
浏览 5提问于2020-11-01得票数 0
1回答
我有数据，我想要分离为一个线性模型分为三个独立的小组。数据范围从0到60。数据的传播方式，我希望0，60，然后其余的中间作为最后一组。我使用了I(as.factor( data )==0)和相同的60来分隔这两种数据，但是如何获得其余的数据。数据的长度是不一样的，因此仅仅将其余的放在另一个对象中就无法工作。
浏览 0提问于2019-11-14得票数 0
回答已采纳
2回答
我试图在更新属性处理器中编写EL。以下是我的要求：
用户输入:存储在属性中的IP地址：target.host.name.linux
我在nifi.properties中定义了另一组属性如下：
trigger.target.system.linux.name=10.44.245.33
trigger.target.system.linux.password=Passw0rd
我正在尝试将用户输入的值与属性文件中的属性值进行比较。如果它们匹配，我将在真实情况下将变量赋值在trigger.target.system.linux.password上面，否则就会发布“no”
下面是一些我试过但徒劳无功的
浏览 1提问于2018-05-09得票数 0
回答已采纳
4回答
因此，我需要全局空间中的实际变量名"varName“。这个函数实际上是类中的一个方法。
为了简单起见，代码是任意的。
$varName = 'what ever';
public function save($var)
{
$i[varName goes here] = $var;
}
我不知道这是否可能，但我想可能是回调？
浏览 3提问于2011-05-31得票数 1
回答已采纳
3回答
我有以下数据：
DF <- data.frame(Members = c("Eva", "Charlie1", "Fred", "Charlie2", "Adam", "Eva", "Charlie2", "David", "Adam", "David", "Charlie1"))
我希望创建一个函数，如果成员名称符合某一条件，则返回特定值：
如果成员名等于Eva或Adam，则返回"Group1“
浏览 6提问于2017-02-23得票数 0
2回答
你好，我正在做一些基本的快速练习。这个是结束开关声明。我对这段代码的理解有增无减，但无法得到正确的解释。
let tuple = ("Matt", 30)
switch (tuple) {
case (let name, let x) where x >= 0 && x <= 2:
print("\(name) is a infant")
case (let name, let x) where x >= 3 && x <= 12:
print("\(name) is a child"
浏览 5提问于2016-04-24得票数 2
回答已采纳
3回答
我想在一个数据框中创建一个列，在另一个列中基于活动名称创建值为"Mobile“和"Desktop”的列，我应该怎么做？
例如：
Campaign Device
Branded-Desktop-Campaign1 Desktop
Branded-Mobile-Campaign2 Mobile
我的数据框大约有2000行。
浏览 0提问于2015-12-24得票数 2
我有一个巨大的数据集，如果列名位于另一列中，则希望在该数据集中更改列范围中的单元格值。
我知道我可以通过细胞循环，并使用it，但这似乎很快就会变慢。我已经使用了mutate()和the ()，但无法解决如何使用列名进行逻辑处理。
如果有人能提出一个向量化的方法，或者向我指出一个类似的问题(我找不到！)，如果可能的话，我将不胜感激。
dataset和嵌套的for循环的示例：
a <- c(1,2,3,4)
b <- c(5,6,7,8)
c <- c(9,10,11,12)
d <- c("a","b","c","n
浏览 6提问于2022-06-30得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
