从数据帧中提取两列并生成一个向量

Question

我有一个包含4列的表，我想提取第1列和第3列来制作一个字符向量。我的目标是为系统发育图定义颜色

Table
name    id  colour  date    
t1  a   red 10/01
t2  b   red 09/02       
t3  c   black   04/04
t4  d   black   05/05

Desired vector
cols <- c("t1"="red", "t2"="red", "t3"="black", "t4"="black")

我已经尝试过这里的建议，但它没有给我我想要的东西。 Converting two columns of a data frame to a named vector

当我执行命令绘制系统发育时，矢量中提供的颜色矩阵不符合。颜色与表格中的颜色不符。

有关详细信息，请参阅my previous thread 我想用猿猴中的cophyloplot为缠结图中的线条着色。参数"col=" states a character vector indicating the color to be used for the links; recycled as necessary

Answer 1

您可以使用setNames功能，例如：

setNames(iris$Petal.Length, iris$Species)