在R中查找命名相似的向量(例如*_pre和*_post)之间的差异
在R中，要查找命名相似的向量（例如_pre和_post）之间的差异，可以使用以下步骤：
- 使用
ls()函数获取当前环境中所有的变量名列表。 - 使用正则表达式或字符串匹配来筛选出符合条件的向量变量名。
- 使用
get()函数根据变量名获取对应的向量数据。 - 使用
diff()函数计算两个向量之间的差异。
下面是一个示例代码：
# 1. 获取当前环境中所有的变量名列表
variable_names <- ls()
# 2. 使用正则表达式或字符串匹配筛选出符合条件的向量变量名
pattern <- "_(pre|post)$" # 正则表达式，匹配以_pre或_post结尾的变量名
matching_variable_names <- grep(pattern, variable_names, value = TRUE)
# 3. 使用get()函数获取对应的向量数据
vectors <- lapply(matching_variable_names, get)
# 4. 计算两个向量之间的差异
differences <- lapply(vectors, diff)
# 打印结果
for (i in seq_along(matching_variable_names)) {
cat("Variable:", matching_variable_names[i], "\n")
cat("Difference:", differences[[i]], "\n\n")
}请注意，上述代码中没有提到特定的腾讯云产品或链接地址。如果您需要推荐相关产品，可以在得到匹配的变量名之后，使用腾讯云的搜索引擎或产品文档来查找适合的产品和链接地址。
相关·内容
1回答
目标
目前我只报告计算方法，如下所示，但我想增加置信区间。
如果我有正确的格式的数据，它将不会让我使用线性回归lm()来计算估计的分组差异及其间隔，但我有困难获得正确的格式的数据。
以下是一些数据：
假数据
> set.seed(909)
> d2017pre <- tibble(n = rnorm(25, mean = 1100, sd = 10),period = "pre", year = 2017)
> d2016pre <- tibble(n = rnorm(25, mean = 1500, sd = 10),period = "
浏览 0提问于2018-03-05得票数 0
回答已采纳
1回答
连体网络的参数更新对比损失训练
、、、、
我试图实现一个相当简单的暹罗网络和一个对比损失函数。我使用经过预先训练的VGG16作为骨干模型，并从编码器中去掉最后的ReLU和MaxPooling。然后添加一个自适应池和一个简单的线性层来生成嵌入向量。
为了测试我的实现，我传递随机输入并检查每个参数是否得到更新。
问题:可以在我的MWE输出中看到，参数列表中的元素25和27不会接收更新。我认为这是最后一层卷积层和线性层的偏差。我还检查了optimizer.param_groups[0][“params”][25].grad和optimizer.param_groups[0][“params”][27].grad的内容。梯度都是零..。，为什
浏览 5提问于2022-04-27得票数 1
1回答
刮起书价
、、
我正在尝试编写一个抓取应用程序，但我遇到了一些问题。我的PHP Curl代码不能将页面与图书的价格一起拉出。它使我返回到域的web根目录。
我正试着用ISBN搜索这个网站。
几天来我一直在用头撞墙。任何帮助都将不胜感激！
代码：
<form method="post" for="new-search" name="SearchTerm" class='form-validate' id="SearchTerm" action="index.php">
<textarea r
浏览 1提问于2011-02-25得票数 1
RBM，我们增加了将可见输入转换为隐藏表示的方法，并将隐藏表示转换为重构的可见输入。这两种方法都返回激活概率，而sample_h方法也返回观察到的隐藏状态。
<pre><code>
class RBM():
def __init__(self, visible_dim, hidden_dim, gaussian_hidden_distribution=False):
self.visible_dim = visible_dim
self.hidden_dim = hidden_dim
浏览 6提问于2021-06-13得票数 0
我正在寻找反馈，以确定如何正确地指定随机效应，以考虑相关性的重复测量设计，但与多个水平的相关性(包括数据是纵向的每个组合的预测)。结果是二元的，所以我将拟合一个物流混合模型。我计划使用来自glmer()包的lme4函数。如果您想知道这些数据是如何产生的，一个例子是来自眼睛跟踪器:人们的眼睛被“跟踪”30秒，例如，在不同级别的预测器下，确定他们是否查看了屏幕上的某个对象(因此产生了二进制结果)。
Study design (可通过处理R中“虚拟数据集”下的代码来查看)：
结果(Binary_outcome)是二进制的。structure).：每个主题的二进制响应在每个预测器组合中被多次记录(参见
浏览 1提问于2020-08-11得票数 2
2回答
我有一个数组问题，并一直致力于这几个月。
$results = $wpdb->get_results('SELECT COUNT(*) AS $total FROM
wp_realty_listingsdb');
print "<pre>";
print_r($results);
print "</pre>";
Array
(
[0] => stdClass Object
(
[$total] => 25
)
)
$results =
浏览 4提问于2016-12-04得票数 0
回答已采纳
1回答
我有一个很简单的问题，但我不知道如何解决它:我正在绘制利克特刻度条形图。
likert_results2 <- structure(list(Survey = c("Post survey \nN= 274", "Post survey \nN= 274",
"Post survey \nN= 274", "Post survey \nN= 274", "Post survey \nN= 274",
浏览 3提问于2020-07-12得票数 0
回答已采纳
AttributeError：类型对象'_io.StringIO‘没有属性'StringIO'
我在以下行(138)中有一个错误：out = StringIO.StringIO()
代码是：
import requests
from random import randint
import string
import random
import urllib
from io import StringIO
import gzip
import json
import time
import _thread
def random_machine_id():
浏览 181提问于2018-07-13得票数 -4
2回答
我有一个二进制word2vec文件，我正在使用gensim加载它。
而gensim中有两个单词之间的similarity函数，但没有计算和返回差异向量的函数。
我如何使用两个向量并得到它们的差向量？
我还试图使用这些差异向量作为文档中每个单词和每个class.Is之间的差异向量的特征，这是正确的方法吗？
例如，如果类是sport和politics
sport = [0.4,0.456,45,...] #wordvector of class
politics = [0.23,0.56...] #wordvector of class
我的话是football
football = [0.2,0
浏览 7提问于2019-07-04得票数 0
正如您在输出中看到的，向量pre的对象不仅“移动”到向量post，而且在内存中保留了它们的原始地址空间。这一举动背后到底是怎么回事？这是预期的行为吗？假设我需要有一个指向这些对象的独立的指针向量，那么假设在这一移动之后，对象总是有它们的原始地址，这是安全的吗？
实际上，我有一个类，包含这样一个向量，还有我提到的作为成员的指针向量。我还删除了复制函数，并为类定义了移动函数。
#include <iostream>
#include <vector>
struct B {
int val = 0;
B(int aInt) : val(aInt) {
浏览 1提问于2018-12-23得票数 7
回答已采纳
我有一个来自4个参与者的数据框架(通过id识别)，变量a和b是在三个不同的时间内测量的：
pre
post1
post2
我需要计算出以下变化的影响大小(Cohen's d)：
pre到post1
post1到post2
在每个变量(a和b)上。
有什么方法可以用purrr::map来计算吗？
数据：
library(tidyverse)
set.seed(1234)
df <- data.frame(
vars = rep(letters[1:2], 12),
value = sample(1:100, 24),
phase =
浏览 0提问于2018-10-18得票数 1
回答已采纳
答案有评论，评论有投票。
答案有选票。
votes table:
id user_id vote votable_id votable_type
1 1 5 1 Comment
2 1 6 1 Post
...
邮政模式：
public function comments()
{
return $this->hasMany('App\Comment','post_id','id');
}
publi
浏览 2提问于2016-09-10得票数 1
回答已采纳
在ramda管道中，我希望减去两个数组键的值，最终得到一个包含这些差异的数组。
例如，考虑下面的mice_weights数组。我想得到一个数组，其中的差异weight_post减去weight_pre，只适用于雄性老鼠。
const mice_weights = [
{
"id": "a",
"weight_pre": 20,
"weight_post": 12,
"is_male": true
},
{
浏览 12提问于2022-02-02得票数 1
回答已采纳
当我这样做时，我有一个关于在$_POST中打印复选框数组的问题：
echo '<pre>';
print_r($_POST);
echo '</pre>';
我可以看到我通过$_POST发送的复选框，我如何才能只读这些复选框？这是我目前所拥有的：
print_r($_POST['checkboxes[]']);
但这似乎行不通
浏览 0提问于2018-04-20得票数 1
我使用了来自Hmisc的rcorr()来进行多个相关(在大约500x40个大数据帧上)。此命令返回一个列表，但我只将所需的内容作为数据帧保存在列表中。因此，我有两个数据帧，一个带有Pearson，一个带有p-值。数据帧之间的所有内容都是相同的，但是单元格值。
AdiASigFatCorr <- rcorr(as.matrix(AdiASigFat), type=c("pearson"))
AdiASigFatCorrP <- as.data.frame(AdiASigFatCorr$P)
AdiASigFatCorrR <- as.data.frame(Adi
浏览 1提问于2014-04-01得票数 0
回答已采纳
我有一个像这样的数据文件：
code number time
0 1.0 899 pre
1 5.0 81 pre
2 3.0 3 pre
3 4.0 3 pre
4 0.0 2 pre
0 1.0 806 post
1 5.0 90 post
2 3.0 75 post
3 0.0 13 post
4 4.0 6 post
我想要一个前后的情节，如下所示：
浏览 2提问于2022-04-17得票数 -2
我没有问题，绘制下面的累积频率图像这样。
library(Hmisc)
pre.test <- rnorm(100,50,10)
post.test <- rnorm(100,55,10)
x <- c(pre.test, post.test)
g <- c(rep('Pre',length(pre.test)),rep('Post',length(post.test)))
Ecdf(x, group=g, what="f", xlab='Test Res
浏览 0提问于2010-03-19得票数 5
回答已采纳
2回答
我的硕士分支历史如下所示
CommitID Comments Time
-------- -------- ----
Commit9 Comment9 9am
Commit8 Comment8 8am
Commit7 Comment7 7am
Commit6 Comment6 6am
Commit5 Comment5 5am
Commit4 Comment4 4am
Commit3 Comment
浏览 7提问于2019-09-18得票数 0
回答已采纳
1回答
我正在使用Gensim中的维基百科，"glove-wiki-gigaword-100"，预先训练过的单词向量。如所示，您可以使用以下方法查询给定单词或一组单词的最相似的单词
model_gigaword.wv.most_similar(positive=['dirty','grimy'],topn=10)
但是，我想查询与给定的向量最相似的单词，该向量指定为数组(其格式与来自预训练模型的字向量相同)。例如，在预训练模型中添加或减去两个字向量的结果，如
vec = model_gigaword['king']-model_gigaw
浏览 3提问于2020-11-23得票数 2
回答已采纳
1回答
“不能张贴w/ nodejs
、、、、
我只想和邮递员做一个app.post req.，但我真的不知道出了什么问题，下面是代码：
const express = require('express');
const PORT = 8080;
const HOST = '0.0.0.0';
const app = express();
app.listen(PORT, HOST);
console.log(`Running on http://${HOST}:${PORT}`);
//我试图做的事：
**app.post('/test',(req, res) => {
浏览 2提问于2020-01-27得票数 0
回答已采纳
1回答
我想使用gensim在我的推文数据集上创建Word2Vec向量。该代码用于基于tweet的多标签情感分类。我有聚合推文文件，其中包含107k推文。我用它来创建基于的Word2Vec向量。我的代码： np.set_printoptions(threshold=sys.maxsize)
#Pre-Processor Function
pre_processor = TextPreProcessor(
omit=['url', 'email', 'percent', 'money', 'phone',
浏览 26提问于2020-04-10得票数 1
我正在尝试将我的javascript转换为类型记录，并提出了另一个问题。下面是我的代码：
var util = {};
然后在后面的代码中：
util.extendRegExp = function (regex, pre, post) {
if (pre === null || pre === undefined) {
pre = "";
}
if (post === null || post === undefined) {
post = "";
}
我试图像这样声明一个接口：
interfa
浏览 2提问于2014-12-29得票数 2
回答已采纳
我正在使用python-eve开发一个rest-api。我的对象包含一个url，一个描述和一个图像。用户可以插入或查看产品(用于插入-用户只需添加一个url，就会生成描述和图像)。
为了避免重复更新-当用户使用POST请求插入已经存在的url时，我想将他重定向到与该url对应的项目的url。为了做到这一点，我添加了以下代码：
def pre_post_callback(request, lookup):
prev_object = current_app.data.driver.db['products'].find_one({"url":lookup.
浏览 1提问于2016-10-28得票数 1
template <typename CRTP>
struct Pre {
CRTP & operator++();
};
template <typename CRTP>
struct Post {
CRTP operator++(int);
};
struct Derived
: Pre<Derived>
, Post<Derived>
{};
int main() {
Derived d;
d++;
++d;
}
我从GCC那里得到了这些错误：
<source>
浏览 0提问于2019-01-08得票数 62
回答已采纳
2回答
C中的保护函数调用
、、、
我要做到以下几点：
假设我们有一些函数foo。我们还有两个函数pre和post，分别检查它的先决条件和后置条件。我们有一些foo函数调用。现在，我想将每个foo调用替换为一个“有保护的”调用，该调用检查条件是否满足。这必须是可切换使用编译器标志。递归foo调用也必须替换。
我能想到的最好的事情是：
#ifdef NDEBUG
int foo_orig(int n);
int foo(int n)
{
int r;
assert(pre(n));
r = foo_orig(n);
assert(post(n, r));
return r;
}
int
浏览 2提问于2015-05-01得票数 2
回答已采纳
如何连接两个表，检查第三个表的正确性，并通过用户列表显示缺少什么？我想要的输出如下：
未找到用户105！
我有：
所有用户名单：
while($all= mysqli_fetch_array($idall))
{
echo '<pre>';
print_r($all);
//print_r($all['id']);
echo '</pre>';
}
输出：
Array
(
[0] => 101
[id] => 101
[1] => tes
浏览 2提问于2022-04-24得票数 -2
我不知道以前是否有类似的问题。我是R语言的初学者，直到现在才找到解决方案。
我有个序列：
a <- c(19, 20, 21, 54 ,55 ,56 ,57, 58, 59, 256, 257, 258, 259, 260, 261, 262, 263, 264, 265, 266, 267, 268, 269, 473, 474, 475)
我想要号码是19 54 256 473
我怎样才能达到这个目标呢？
浏览 5提问于2021-12-14得票数 2
回答已采纳
1回答
简单的循环问题，我知道有多种方法可以做到这一点，但是为了学习R，我尝试用多种方法计算相同的答案。谢谢你的帮助！
问题计算税后利润高于全年平均水平的月数。
数据
revenue <- c(14574.49, 7606.46, 8611.41, 9175.41, 8058.65, 8105.44, 11496.28, 9766.09, 10305.32, 14379.96, 10713.97, 15433.50)
expenses <- c(12051.82, 5695.07, 12319.20, 12089.72, 8658.57, 840.20, 3285.73, 5821.12,
浏览 3提问于2019-12-01得票数 2
回答已采纳
1回答
我正在做一个R项目的研究。数据存储在3个zoo对象中，每个对象有9列。我想对每一列进行granger测试，并将结果(Pr(>F)值)存储在3个矩阵9x9中。
我尝试使用for()循环，但遇到了以下问题
for(i in 1:ncol(dfvola.pre)) {
grangertest(order=4,
dfvola.pre[,2],
dfvola.pre[,i])$'Pr(>F)'[2]
}
生成错误Error in solve(vc[ovar, ovar]) : subscript out of bounds
在同一时间
浏览 0提问于2012-02-27得票数 1
回答已采纳
1回答
两个文档之间的不同特征
、、、
我试图找出这两份文件之间的不同之处。我正在使用gensim，到目前为止已经获得了相似度分数。
有没有办法知道两个文档之间的相异分数和相异特征？如何评估它？
浏览 1提问于2018-07-03得票数 0
1回答
我想问一下，在群体和阶段变量之间存在交互作用的情况下，如何正确地执行R中的简单主效应分析？
我的一个朋友在SPSS上做了同样的分析(使用Bonferroni校正)，我试图在R.
我有以下结构的数据集：
ID Group Stage Y
1 I pre 0.123
1 I post 0.453
2 II pre 0.676
2 II post 0.867
3 I pre 0.324
3 I post 0.786
4 II pre 0.986
4 II post 0.112
... ... ... ..
浏览 3提问于2016-05-17得票数 2
假设我有这样一个数据文件：
1360 C 0 403
1361 A 0 403
1362 G 0 403
1402 0 A 444
2019 T 0 1060
2020 T 0 1060
2021 G 0 1060
2022 T 0 1060
2057 T 0 1085
2062 0 A 1093
2062 0 C 1094
2062 0 C 1095
期望输出
1402 0 A 444
2057 0 0
浏览 3提问于2016-04-22得票数 0
回答已采纳
我想问一下在Qt中使用哪个更好？ QStringList基本上什么是QList，所以我使用std::liststd::shared_ptr将整个对象保存到list....or？ 这个列表被保存为类变量，并且我不会将它作为参数传递。可能会保存300个字符串(文件夹路径)。 我会说使用std：：指针列表更好，但也许在Qt中使用QStringList有任何优势。 谢谢你的回答。
浏览 32提问于2020-06-28得票数 0
我正在学习dplyr上的一个DataCamp类。他们让我加载'hflights‘数据，然后让我创建一个名为'Carrier’的新列，用每个航空公司代码的实际名称替换它们。解决方案如下所示：
hflights <- tbl_df(hflights)
names <- c("AA" = "American", "AS" = "Alaska", "B6" = "JetBlue", "CO" = "Continental",
浏览 16提问于2016-07-28得票数 1
回答已采纳
问题是：
我需要建议的标签，用户只根据标题(5-15字)的名单，他们即将创建。
我们有大约30个预先确定的标签-
Gaming, Movies, TV shows, Documentaries, Books, Music, Art, History, People, Adventure, Sports, Cooking, Travel, Places, Food, Drinks, Fitness, DIY, Technology, Science, Cars, Bikes, Comedy, Shopping, Clothes, Fashion, Photography, Nature, etc
浏览 0提问于2017-11-28得票数 0
回答已采纳
2回答
我想用2本不同长度的字典来比较一大组数据。(编辑)
post = {0: [0.96180319786071777, 0.37529754638671875],
10: [0.20612385869026184, 0.17849941551685333],
20: [0.20612400770187378, 0.17510984838008881],...}
pre = {0: [0.96180319786071777, 0.37529754638671875],
1: [0.20612385869026184, 0.1784994155168
浏览 2提问于2011-10-31得票数 3
回答已采纳
3回答
我们有10000行ages (float), titles (enum/int), scores (float)的无聊的CSV。如何选择1000行最不同的行？我想找一种通用的解决办法，可以适用于不止一个案件。
我所说的不同是什么意思：
我们有N个列，每个列在一个表中都有int/float值。
你可以想象这是ND空间中的点
我们希望选择K点，使彼此之间的距离最大化。
所以，如果我们在一个密集的星系团中得到100分，在距离上有一个点，我们就可以得到这样的3分：
📷
或者这个
📷
它看起来像一个具有给定分辨率的ND点云“三角剖分”，但对于3d点却没有.那么，如何从N中选择K个最遥远的行(点)(具有任
浏览 0提问于2020-06-25得票数 6
我目前正在使用PHP开发一个SOAP项目。脚本正在连接到远程.NET服务服务器。我使用HelloWorld操作获得了一个很好的响应-- provide，但是当脚本使用其他操作获取任何其他数据时，我得到
“对象引用未设置为对象的实例。”
在$data数组的衍射子数组中(见下文)。
以下是当前代码，不包括服务URL和params。
<?php
require_once('../lib/nusoap.php');
$options = array(
# server
'wsdl' => false,
's
浏览 4提问于2010-04-15得票数 1
目前，我正在研究吉姆·阿尔伯特的 by with R。对于他的例子，我有一个关于他的代码的查询，这个例子具有beta的可能性和离散的先验。他计算后部的代码是：
pdisc <- function (p, prior, data)
s = data[1] # successes
f = data[2] # failures
#############
p1 = p + 0.5 * (p == 0) - 0.5 * (p == 1)
like = s * log(p1) + f * log(1 - p1)
like = like * (p
浏览 3提问于2015-04-01得票数 0
回答已采纳
我在R中有一组向量，我想找出在那之后值突然减少的任何索引。例如: 1739,11560,20257,4,2,0,5在这个例子中，输出应该是"4“。我该怎么做呢？
浏览 0提问于2017-02-12得票数 0
2回答
我有一个想要流出的SceneElements集合。这是聚合类：
class scene{
public:
vector<sceneElement> elements;
void addElement(sceneElement);
void toStream(std::ostream &);
void fromStream(std::istream &);
};
void scene::addElement(sceneElement e){
elements.insert(elements.end(), e);
}
void
浏览 0提问于2013-01-21得票数 1
回答已采纳
1回答
问题:针对特定参数，比较节点的预检查状态和后检查状态的文件。
在社区的一些帮助下，我写了以下解决方案，从pre和post目录中提取信息，并基于"Node-ID“(它恰好是唯一的，也将从文件中提取)。在从Pre/post文件夹中提取数据后，我已经基于node-id创建了文件夹，并将文件转储到这些文件夹中。
我提取数据的代码(从Pre和Post文件夹中提取数据)
FILES=$(find postcheck_logs -type f -name *.log)
for f in $FILES
do
NODE=`cat $f | grep -m 1 ">" | a
浏览 0提问于2012-07-22得票数 0
回答已采纳
1回答
我试图使用numpy来规范一组MRI图像，但它似乎不起作用。简化的代码是：
img = nib.load(img_path).get_data() #img is a numpy array
print("pre\n============================")
plt.imshow(img[:,:,100])
plt.ioff()
plt.show()
img = (img - 47.08389527329749)/125.64995558389833
print("post\n============================")
p
浏览 0提问于2019-05-03得票数 1
回答已采纳
2回答
我正在学习戈朗源代码，并陷入延迟函数执行顺序。我有两个文件:一个定义端点的行为，另一个用于测试。我删除了一些与我的问题无关的代码，以减少要读的行数。端点定义文件
// Endpoint is the fundamental building block of servers and clients.
// It represents a single RPC method.
type Endpoint func(ctx context.Context, request interface{}) (response interface{}, err error)
// Middleware i
浏览 0提问于2021-10-31得票数 0
回答已采纳
2回答
未知SSE瓶颈
、、、、
我有一个通用代码，我正试图移动到SSE，以加快它的速度，因为它经常被调用。所讨论的代码基本上如下所示：
for (int i = 1; i < mysize; ++i)
{
buf[i] = myMin(buf[i], buf[i - 1] + offset);
}
myMin在哪里是简单的min函数(a < b)？B：(我看过拆卸，这里有跳转)
我的SSE代码(我已经经历了几次迭代以加快)现在是在这个表单上：
float tmpf = *(tmp - 1);
__m128 off = _mm_set_ss(offset);
for (int l = 0; l < m
浏览 4提问于2014-09-16得票数 2
2回答
电子邮件是从相同的代码发送的，现在我在添加附件代码后从sandgrid api收到"resource not found“错误，"sendgrid/sendgrid"："~6.0”和"laravel/framework"："5.4.*"， $from = new SendGrid\Email($data['from_name'], $data['from']);
$subject = $data['subject'];
$to = new SendGrid\Email("u
浏览 11提问于2020-04-16得票数 1
回答已采纳
“高级R”的作者肯定比我更了解R。但是，包含以下声明：
Map()对所有参数进行矢量化，因此不能提供不变的参数。
但这显然是错误的。例如，我可以轻松地编写以下内容：
> Map(function(x,y) x+y,1:3,runif(1))
[[1]]
[1] 1.224857
[[2]]
[1] 2.224857
[[3]]
[1] 3.224857
事实上，在作者自己的purrr:map函数中也可以找到相同的功能：
purrr::map(1:3,function(x,y) x+y,runif(1))
[[1]]
[1] 1.729889
[[2]]
[1] 2.7298
浏览 3提问于2021-03-14得票数 0
回答已采纳
3回答
我被告知使用距离公式来找出颜色是否与另一种颜色匹配，所以我这样做了，
struct RGB_SPACE
{
float R, G, B;
};
RGB_SPACE p = (255, 164, 32); //pre-defined
RGB_SPACE u = (192, 35, 111); //user defined
long distance = static_cast<long>(pow(u.R - p.R, 2) + pow(u.G - p.G, 2) + pow(u.B - p.B, 2));
这只给出了一个距离，但我如何知道颜色是否与用户定义的颜色匹配至
浏览 5提问于2010-11-13得票数 5
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
