程序员经验分享-hwhale

将一个方阵中的 NA 添加并将其放入另一个方阵中

2023-11-30

我想知道是否可以选择NA列和NA行从d1方阵并将它们放入d2方阵来实现我的DESIRED, d3方阵？

这是一个玩具示例，并且d1 and d2方阵可以是任意维数。这样就实现了类似的功能NA替换品表示赞赏。

m1="
a1 a2     a3   a4   a5   a6  a7  a8   a9     b1   b2     b3
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.1    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
NA   NA   NA   NA   NA   NA   NA   NA   NA    NA    NA    NA
0  0.0    0    0    0    0   NA  0.3  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.1    NA   0.0    NA
NA   NA   NA   NA   NA   NA   NA   NA   NA    NA    NA    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.3    NA
NA   NA   NA   NA   NA   NA   NA   NA   NA    NA    NA    NA"

d1 <- sapply(read.table(text=m1,h=T),as.numeric)


m2="
a1 a2     a3   a4   a5   a6 a8   a9   b2
1  2.0    1    9    4    0  0.0  3.0  1.0
0  0.1    0    0    0    0  0.0  0.0  0.0
0  0.0    7    0    0    0  0.0  0.0  0.0
0  0.0    0    5    0    0  0.0  0.0  0.0
0  0.0    0    0    0    0  0.0  0.0  0.0
0  0.0    0    0    0    0  0.0  0.0  0.0
0  0.0    0    0    3    0  0.3  0.0  0.0
0  0.0    0    0    0    0  0.0  0.1  0.0
0  0.0    8    0    6    0  0.0  0.0  0.6"

d2 <- as.matrix(read.table(text=m2,h=T))

DESIRED="
a1 a2     a3   a4   a5   a6  a7  a8   a9     b1   b2     b3
1  2.0    1    9    0    0   NA  0.0  3.0    NA   1.0    NA
0  0.1    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    7    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    5    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.0    NA   0.0    NA
NA   NA   NA   NA   NA   NA   NA   NA   NA    NA    NA    NA
0  0.0    0    0    3    0   NA  0.3  0.0    NA   0.0    NA
0  0.0    0    0    0    0   NA  0.0  0.1    NA   0.0    NA
NA   NA   NA   NA   NA   NA   NA   NA   NA    NA    NA    NA
0  0.0    8    0    6    0   NA  0.0  0.0    NA   0.6    NA
NA   NA   NA   NA   NA   NA   NA   NA   NA    NA    NA    NA"

d3 <- as.matrix(read.table(text=DESIRED,h=T))

Since d1尺寸正确，复制d1 to d3然后复制元素d2到非 NA 元素中d3:

d3 <- d1
d3[!is.na(d3)] <- d2
# or a one-liner
d4 <- replace(d1, !is.na(d1), d2)
identical(d3, d4)
#> [1] TRUE
d3
#>       a1  a2 a3 a4 a5 a6 a7  a8  a9 b1  b2 b3
#>  [1,]  1 2.0  1  9  4  0 NA 0.0 3.0 NA 1.0 NA
#>  [2,]  0 0.1  0  0  0  0 NA 0.0 0.0 NA 0.0 NA
#>  [3,]  0 0.0  7  0  0  0 NA 0.0 0.0 NA 0.0 NA
#>  [4,]  0 0.0  0  5  0  0 NA 0.0 0.0 NA 0.0 NA
#>  [5,]  0 0.0  0  0  0  0 NA 0.0 0.0 NA 0.0 NA
#>  [6,]  0 0.0  0  0  0  0 NA 0.0 0.0 NA 0.0 NA
#>  [7,] NA  NA NA NA NA NA NA  NA  NA NA  NA NA
#>  [8,]  0 0.0  0  0  3  0 NA 0.3 0.0 NA 0.0 NA
#>  [9,]  0 0.0  0  0  0  0 NA 0.0 0.1 NA 0.0 NA
#> [10,] NA  NA NA NA NA NA NA  NA  NA NA  NA NA
#> [11,]  0 0.0  8  0  6  0 NA 0.0 0.0 NA 0.6 NA
#> [12,] NA  NA NA NA NA NA NA  NA  NA NA  NA NA

注意：看来您发布的“所需”矩阵的第一个元素应该是1代替0.

本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)

r

function

matrix

将一个方阵中的 NA 添加并将其放入另一个方阵中 的相关文章

  • 在 for 循环中绘制的多个 ggplot2 绘图的网格

    作为一个新的 ggplot2 用户 我对可能性的数量感到有点迷失 并且很难在网上找到我认为简单问题的简单答案 我想在同一张纸上显示 ggplot2 的多个图 但知道这些图来自 for 循环 以下示例无法编译 仅用于说明 for i in c

  • 在 Shiny 中使用 readlines(prompt = )

    我有一个代码 使用以下方式获取输入readlines prompt 功能 您能告诉我 Shiny 中的哪个输入函数足以将此代码适应 Shiny 应用程序吗 我需要一个交互功能 我无法使用简单的输入selectInput 因为我有很多read

  • R 中大型稀疏矩阵的聚类分析

    我有一个包含 250000 笔交易 行 和 2183 项 列 的交易数据集 我想将其转换为稀疏矩阵 然后对其进行分层聚类 我尝试了包 sparcl 但它似乎不适用于稀疏矩阵 关于如何解决这个问题有什么建议吗 或者我可以使用任何其他包对稀疏矩

  • 包检查时如何有效处理未压缩的保存？

    在最近开发一个包的过程中 我将数据集包含在data 我的包的文件夹 在我的具体情况下 我有 5 个数据集 所有这些数据集都位于data table格式 尽管我在下面描述的问题仍然存在 如果我将它们保留为data frame 我已将每个人单独

  • udunits2 R 安装：找不到 udunits2.h

    我正在尝试在 R 中安装 udunits2 以满足对ggforce包裹 但是 安装程序在检查 udunits2 时始终失败 我已经尝试过中的说明this https stackoverflow com questions 47059517

  • R 中 write.table 文件名中的变量

    请帮助我解决一个幼稚的问题 已经用谷歌搜索 并尝试了很多变体 但失败了 如何使用 R 中 write table 的文件名中的变量保存文件 脚本循环遍历 dir 中的文件 应用一些函数 然后将结果保存到具有相同名称但附加结尾的文件中 谢谢

  • 将文本添加到 ggplot 中的轴标签

    我从下表中绘制了一个图表 BoatPhs fit se lower upper 1 Before 3 685875 0 3287521 3 038621 4 333130 2 After0 20NTA 3 317189 0 6254079

  • mclapply 用户时间大于已用时间

    我正在尝试使用mclapply的功能parallel封装在R 该函数通过计算对数似然距离将值分配给序列矩阵 这是一个 CPU 密集型操作 所结果的system time价值观令人困惑 gt system time mclapply work

  • 通过 RSelenium 单击按钮

    我正在尝试使用 Rselarium 和 Rvest 来抓取 REI 的评论 吊床 我想点击底部的按钮 x 次 这样我就可以抓取所有评论 我有点失落 这是我到目前为止所拥有的 如果您也知道如何在取景器中预览您正在做的事情 而不是屏幕打印 那就

  • 如何用日语创建 ggplot2 标题？

    我正在准备日语演示文稿 并希望图像的标题和图例名称为日语 我可以让文本在 RStudio 中渲染得很好 但是当渲染图像时 日语字符仅显示为方框 x 10 10 y x x df data frame x y ggplot df aes x

  • 如何在R中逐行写入文件

    我正在尝试逐行读取 csv 文件 并且仅选择左侧的第二个和第三个单元格以及右侧的第三个单元格 例如 如果这一行中有 17 个单元格 我将选取第 15 个单元格 然后我想合并这 3 个单元格 用逗号分隔 然后将此行写入一个新的 csv 文件

  • 在ggplot2中创建部分虚线

    我正在 R 中创建一个图 并且需要创建一条线 其中某些值是投影 投影用虚线表示 这是代码 df data frame date c rep 2008 2013 by 1 value c 303 407 538 696 881 1094 gg

  • R：在函数中包含循环？

    以下代码可用于创建一个 data frame 其中 Kendall Tau 和 Spearman 相关结果彼此相邻 data mtcars mtcars correlation lt function x y df1 cor data fr

  • 为什么我在 ddply 中看到“错误：length(rows) == 1 is not TRUE”？

    我有一个数据框 比如工资单 例如 payroll lt read table text AgencyName Rate PayBasis Status NumRate HousingAuthority 26 843 00 Annual Fu

  • R中有字典功能吗

    有没有办法在 R 中创建一个 字典 使其具有对 一些效果 x dictionary c Hi Why water c 1 5 4 x Why 5 我问这个是因为我实际上正在寻找两个分类变量函数 所以如果 x dictionary c a b

  • 我可以调整scale_color_brewer的下限吗？

    我已经订购了我想使用 color Brewer 的分类数据 但我很难看到非常低的值 有没有办法去掉这些较低的值或设置范围的下限 ggplot data frame x 1 6 y 10 15 w letters 1 6 aes x y co

  • 使用 R 中的 tidyverse 重新调整因子和重新排序因子

    我想使用这些功能重新调平 and 重新排序 在我的数据框中 我了解重新调整级别的工作原理 但我不明白为什么我在 data frame 中看不到级别的变化 例如 假设我有鸢尾花数据集 library tidyverse head iris g

  • 根据共同值对两个数据帧求和

    我有一个看起来像的数据框 day of week count 1 0 3 2 3 1 3 4 1 4 5 1 5 6 3 另一个喜欢 day of week count 1 0 17 2 1 6 3 2 1 4 3 1 5 4 5 6 5

  • 一次评论多个对象

    假设您有一个变量 a 到 j 的列表 for x in 1 10 assign letters x x 您将如何评论那些最近创建的对象 我尝试过类似的事情 for x in 1 10 comment get letters x lt pas

  • DT数据表中的列对齐

    In my shiny我正在使用的应用程序datatable函数来自DT库构建一个表格并希望将列居中对齐 我可以用formatStyle column textAlign center 但它只影响列体而不影响标题 我们必须设置columnD

随机推荐

  • 为什么 Microsoft Azure（或一般的 Swift）无法更新变量以在表查询后返回？

    我一直在关注微软Azure文档成功查询表 将项目插入 读取和更新到数据库中工作正常 但在一个简单的方法结束时 立即关闭文档 func getAllEventIDs gt String var events String this is to

  • 基于 Django 类的 UpdateView 以及用于多个上传文件的表单

    针对我目前面临的问题 我有两个问题 django 中的最佳实践是覆盖 CreateView 中的 post 方法吗 如果不是 您是否在 CategoryFullForm 或 CreateView 中编写 form valid 函数 它会是什

  • 名称查找和类范围

    为什么setVal的返回类型是string类型 参数类型是double类型 typedef string Type Type initVal class Exercise public typedef double Type Type se

  • Ember renderTemplate 中继模型

    在这里努力开发我的 Ember 应用程序 一切进展顺利 但是 我遇到了意外行为的问题 并且不确定解决此问题的最佳方法 问题是在特定路线中 我想将另一条路线渲染到另一个出口 但是 我渲染到另一个出口的另一条路线并不保留它自己的模型 如果我这样

  • 如何在 Tensorflow 中将变量重用设置回 False？

    在Tensorflow中 我们可以将变量重用设置为True with tf get variable scope reuse variables 有什么方法可以在不离开范围的情况下将其设置回 False 吗 这不可能 在共享变量的教程中 他

  • 如何在 Linux 中转义 scp 复制路径中的空格？

    我想将文件从远程复制到本地系统 现在我在linux系统中使用scp命令 我有一些文件夹或文件名带有空格 当我尝试复制该文件时 它显示错误消息 没有这样的文件或目录 I tried scp email protected home 5105

  • Laravel 4 - 分页忽略 Fluent 中的不同

    我以清晰和分页的方式提出流畅的请求 我的问题是分页请求在不同的请求之前执行 我的流利要求 candidates DB table candidates gt select candidates gt distinct gt join can

  • 如何使 For-Each 循环向后运行

    我用 VBA 编写了一个小脚本 它根据列表检查给定范围内的单元格的值 如果单元格值与列表中的值匹配 则保留该单元格值 否则将其删除 我想知道如何让它向后运行 因为向前运行会产生问题 我对此进行了一些研究 并尝试将 Step 1 附加到开始

  • Matlab神经网络，如何强制使用某些集合进行训练、验证和测试？

    如果您使用 GUI nnstart 则仅提供输入和输出 但您无法决定哪些行将作为训练 验证和测试集 因为它们是随机选择的 如何手动指定它们 您可以使用从 NNSTART 启动的任何 GUI 来创建一些示例训练代码 然后通过设置以下数据划分值

  • 从 Base64 编码字符串中检索 ECC 公钥

    我一直在尝试创建一个实例java security PublicKey使用 Base64 编码的 ECC 公钥 MainActivity java Override protected void onCreate Bundle savedI

  • 生成的 SVG 图像不显示

    我正在开发一个 JavaScript 类来显示所有 SVG 对象 但是当我创建元素 image 时 浏览器不会显示它 但是 如果我复制生成的代码并将其放入另一个文档中 则会显示图像 当我使用 Firebug 的检查器搜索图像时 出现了对象但

  • EJB 3.1：是否允许将 Bean 注入到不受容器管理的资源中？

    我使用的是 JBoss 6 1 它不完全符合 EJB 3 1 截至目前 我无法通过以下方式将 EJB 注入到我的 Struts 操作类 或任何非 Java EE 容器管理的类中 EJB 但是当 EJB 3 1 规范完全实现时这可能吗 如果没

  • Spring Security 注销后退按钮

    spring security有办法防止下面最后一点吗 我用的是3 0 5 用户登录我的网站 用户转到网站中的任何页面并单击注销 注销链接使用户会话无效并将其发送到我网站的登录页面 在同一浏览器中 用户导航到新网站 例如 cnn com 用

  • 无法在android中的graph api中获取性别

    我无法在这里获取性别OnCompleted功能 我可以获得其他参数 例如id name email 目前应用程序处于开发模式 这是昨天工作的 Code GraphRequest request GraphRequest newMeReque

  • 使用“ADODB.Stream”将ANSI转换为UTF-8，第一行丢失1-2个字符

    我需要将 ANSI csv 文件转换为 UTF 8 csv 文件 下面的代码可以工作 但第一个字符丢失 请参阅随附的屏幕截图 原始文件 客户 输出文件 客户 Function Convert myFileIn myFileOut Dim s

  • JavaScript this 来自 jQuery this

    有没有办法从 jQuery this 获取 JavaScript this this this 任何this is this不是 jquery 而是一个特殊的 有些复杂的 javascript 关键字 用于描述当前的执行范围 您的挑战可能是

  • 无法识别 Visual Studio 代码任务构建“C:\Program”

    因此 我使用 Visual Studio Code 来构建并运行一个简单的 C 程序 我使用tasks json来处理编译 基于此 如何使用 VS Code 和 cl 编译 C 代码 See https go microsoft com f

  • Pymssql 是否可以与 MS SQL Server 建立安全连接 (SSL)？

    我正在使用 Python 代码 Pymssql 库 从 MS SQL 服务器进行查询 但是我想知道是否有任何方法可以使连接安全并加密从服务器发送到 python 的数据 Thanks 是的 它可以 您需要通过 OpenSSL 支持 SSL

  • boost:thread - 编译器错误

    我想在程序中使用 boost thread 但出现以下编译器错误 Visual Studio 2005 Error 1 error C2064 term does not evaluate to a function taking 0 ar

  • 将一个方阵中的 NA 添加并将其放入另一个方阵中

    我想知道是否可以选择NA列和NA行从d1方阵并将它们放入d2方阵来实现我的DESIRED d3方阵 这是一个玩具示例 并且d1 and d2方阵可以是任意维数 这样就实现了类似的功能NA替换品表示赞赏 m1 a1 a2 a3 a4 a5 a

热门标签