我试图画一个散点图,然后覆盖一些多边形,并在ggplot 2中用特定的颜色填充多边形,但我在获取正确的填充颜色时遇到了一些问题。我可以绘制散点图和多边形,并将散点图和多边形的边界着色为相同的颜色,但当我尝试填充多边形时,它们总是显示不同的颜色或给我带来错误。
我的数据是这样的,
id lat long group
Ak 0.5109300 30.43713 1
Ak 0.5109300 30.43713 2
An 0.4709994 30.43434 1
An 0.4860330 30.44015 2
At 0.4956100
我有一个像这样的df
ProjectID Dist
1 x
1 y
2 z
2 x
2 h
3 k
.... ....
我想添加第三列,这样我们对每个ProjectID都有一个递增计数器:
ProjectID Dist counter
1 x 1
1 y 2
2 z 1
2 x 2
2 h 3
1 k 3
....
我想执行一个非平凡的group_by,通过单元素对其变量中的一个列表进行分组和汇总。
df <- data.frame(x = 1:5)
df$y <- list("A", c("A", "B"), "C", c("B", "D", "C"), "E")
df
x y
1 1 A
2 2 A, B
3 3 C
4 4 B, D, C
5 5 E
现在按y分组(并说“不”。),它是一个包含元素列表的变量
我有两个列,一个标识符(C1)和一个目标(C2)。
C1 C2
qw qw, er
er ty
ty ty
现在,我需要在相应的C1字符串中搜索C2的元素。在这个例子中,结果是:
C3
ALSO
NONE
ONLY
我在case_when语句中使用了case_when,但是只使用C1的第一个元素进行匹配:
C3 <- case_when(C1==C2~"ONLY",
grepl(C1, C2)~"ALSO",
TRUE~"NONE")
只有结果是可以的,因为它们不需要字
我有一个非常大的数据框,其中第一列中的每一行都表示一个带有数字的id。其他行有一个分类变量,该变量可以是两种类型(在本例中为A或B),每种类型持续一年。以下是一个简化的数据帧作为示例: id var2017 var2018 var2019
1 A B A
2 B A A
3 B A B
4 A A A
5 A B B 我想创建一个条形图,其中包含每年每种类型(A和B)的计数,条形图按类型分组。我是R
我有一张清单看起来像这样。我将其除以“ID”,得到了列表中大约1,400个不同的组件(每个组件都是包含多个物种观察的不同位置)。
ID Species 2013 2008 2003
AA 1501106 11 1751.047 1504.080 1580.337
AA 1501106 11 1856.224 1678.837 1592.824
AA 1502114 11 1766.527
下面列出了一个简单的数据集
ID
Date
Status (String)
我有两个参数设置开始日期和结束日期结束目标是要做的是显示任何ID的列表,其中的状态在开始日期和结束日期之间发生了变化。我真的不关心中间日期,只关心IDStatus != IDStatus的地方。我在tableau中找不到任何我可以用来做这件事的东西,任何建议都将不胜感激。
编辑:真的,如果有人能帮我得到一个等于起始状态的计算字段,我可能就能搞清楚剩下的部分。谢谢
我有HashMap:
private final ConcurrentHashMap<String, List<Client>> clients;
和班级:
public static class Client {
private String name; // it is also the key of the map
private String url;
}
从几个线程中,我调用线程安全方法"removeElement“,它必须从列表中删除一个值。
@Override
public CompletableFuture<Void>
我有一个变量,其名称和值都是动态确定的。我想把这个变量附加到列表中,所以我需要用表单list(x)来表示它。我的困难在于定义x应该是什么。因此,例如,如果名称的值由变量a给出,且值为b,则两者都有
a <- "name"
b <- 3
但我得到了这个结果:
list(a = b)
$a 1 3
值是正确的,但名称不是。我希望列表在变量a后面查找它的当前值,即“名称”。请问我该怎么做?
我一直在使用topicmodels包在R中创建LDA模型。
require(tm)
require(topicmodels)
textvector <- c("this is one sentence", "this is another one",
"a third sentence appears")
#and more, read in through a file
dtm <- DocumentTermMatrix(Corp