小编Gil*_*esh的帖子

让

vetA <- c(1,2,1,2,1,3,4,1,2,3,2,1,4)

有什么可能,所以我可以进行以下交换？交换:

• 1 -->3
• 2 -->4
• 3 -->2
• 4 -->1

我试过这个:

vetB <- as.factor(vetA)
levels(vetB) <- c(3,4,2,1)
vetA <- as.integer(vetB)

# because
print(vetB)
# [1] 3 4 3 4 3 2 1 3 4 2 4 3 1
#Levels: 3 4 2 1

它没用.你能帮我个忙吗？

我如何为树形图中添加的一些彩色条添加标签？

下面的代码将显示我为瞄准任务所做的两次尝试,即在彩色条的标签中将值1连接到红色并将值0连接到颜色白色.

# replacing the graphic window parameter so the color bars would fit
par( oma = c(0,1,1,1), mgp = c(1,0.5,0), mar = c(10,2,2,2) )

# load necessary packages
library( squash )
library( dendextend )

# "initializatin"
data("mtcars")
myDend <-  as.dendrogram(hclust(dist(mtcars))) 

# creating the numeric & color matrix used for
# (attempted) labels & colors bars, respectively
myStatus <- cbind(mtcars$vs,mtcars$am)
myColors <- matrix(c("mintcream","firebrick3")[1 + myStatus],ncol = 2)
myColors <- matrix(c("mintcream","firebrick3")[1 + cbind(mtcars$vs,mtcars$am)], …

如何在树状图中画一条线，对应于给定标准的最佳 K？

像这样：

让我们假设这是我的树状图，最好的 K 是 4。

data("mtcars")
myDend <-  as.dendrogram(hclust(dist(mtcars))) 
plot(myDend)

我知道该abline函数能够在图形中绘制类似于上面显示的线条。但是，我不知道如何计算高度，因此该函数用作abline(h = myHeight)

我是 Web 开发和 Firebase 的新手，出现错误。我一直无法解决它所以来到这里寻求帮助。

显示的错误是firebase.storage() is not a function。我的电脑中似乎没有正确设置 firestorage。但是，我已经按照从 google 网站本身下载的说明进行操作，并没有改变任何事情。

我在 Stack Overflow 上看到了一些关于此的其他问题，但他们使用 node 或 react 这不是我的情况。有人可以给我一个提示吗？

我知道它没有详细解释，因为正如我之前所说，我不是专家。请全面，我会更好地发展我的问题。

我创建的代码如下。第一个块是.html文件的子集。另一个是我的.js 文件的正文

  <!-- Firebase App is always required and must be first -->
      <script src="https://www.gstatic.com/firebasejs/5.9.1/firebase-app.js"></script>
      <!-- Add additional services that you want to use -->
      <script src="https://www.gstatic.com/firebasejs/5.9.1/firebase-auth.js"></script>
      <script src="https://www.gstatic.com/firebasejs/5.9.1/firebase-database.js"></script>
      <script src="https://www.gstatic.com/firebasejs/5.9.1/firebase-firestore.js"></script>
      <script src="https://www.gstatic.com/firebasejs/5.9.1/firebase-messaging.js"></script>
      <script src="https://www.gstatic.com/firebasejs/5.9.1/firebase-functions.js"></script>

      <!-- Inicializa o firebase -->
      <script>
          var config = {
              apiKey: "..",
              authDomain: "..",
              databaseURL: "..",
              projectId: …