小编Rac*_*wal的帖子

R:在数据帧的多个列上进行行方式计算的最快方法

我有一个数据框,我想添加另一列,这是一个涉及3个其他列的计算结果.我现在使用的方法似乎很慢.有没有更好的方法来做同样的事情.这是我正在使用的方法.

library(bitops)

GetRes<-function(A, B, C){
  tagU <- bitShiftR((A*C), 4)
  tagV <- bitShiftR(B, 2)

  x<-tagU %% 2
  y<-tagV %% 4

  res<-(2*x + y) %% 4
  return(res)
}

df <- data.frame(id=letters[1:3],val0=1:3,val1=4:6,val2=7:9)
apply(df, 1, function(x) GetRes(x[2], x[3], x[4]))
Run Code Online (Sandbox Code Playgroud)

我的数据框非常大,需要很长时间才能完成这项计算.有人可以建议我做得更好吗?

谢谢.

r function apply dataframe

4
推荐指数
1
解决办法
2273
查看次数

R:ggplot ylim不起作用

我试图改变情节中的ylim.但是一旦我改变它,情节就会消失.我无法弄清楚原因.有人可以帮我解决问题吗?

>df<-data.frame(Category=c("A", "B", "C", "D", "B", "A", "D", "C"), Setup=c("X", "Y"), Gain=c(1.4, 1.45, 1.43, 1.48, 1.33, 1.37, 1.04, 1.09))
>p<-ggplot( df, aes(Setup, Gain)) + ylim(0.9, 1.25) + geom_bar(stat="identity") + facet_wrap( "Category", ncol=2 )
Run Code Online (Sandbox Code Playgroud)

当我删除ylim()时,上面的代码工作,但ylim它不起作用.知道这是什么问题吗?

谢谢.

r ggplot2 dataframe

4
推荐指数
1
解决办法
9660
查看次数

python:将bytearray转换为ctypes Struct

我有一个'n'字节bytearray.这与定义的ctypes.Sturcture之一相同.我想将这个bytearray类型化为这个结构.这样我就可以访问这个成员了.我怎样才能做到这一点?

class ABC(Structure):
    _fields_ = [("a", c_uint), ("b", c_ushort), ("c", c_ushort)]

class DEF(Structure):
    _fields_ = [("abc", ABC), ("i", I)]

b = bytearray(b'\x88\x08\xc0\xf9\x02\x85\x10\x00\xcc')

s = DEF()
print(s.abc.a)
Run Code Online (Sandbox Code Playgroud)

如何获得上述print声明的正确值?

python ctypes bytearray

4
推荐指数
1
解决办法
4921
查看次数

bash:awk替换文件中的字符串

我有一个基于文本的数据库文件,用于存储学生条目,如下所示:

SID:LNAME:FNAME:hw01:quiz01
004:dravid:rahul:78:100
002:ganguly:sourav:54:13
005:kohli:virat:48:43
001:kumble:anil::54
003:tendulkar:sachin:87:78
Run Code Online (Sandbox Code Playgroud)

用户输入他想要更新的标题和学生的sid/lname/fname.因此,例如,如果用户输入

sid = 001,hw01,得分= 19,我想要输出如下:

SID:LNAME:FNAME:hw01:quiz01
004:dravid:rahul:78:100
002:ganguly:sourav:54:13
005:kohli:virat:48:43
001:kumble:anil:19:54
003:tendulkar:sachin:87:78
Run Code Online (Sandbox Code Playgroud)

我意识到awk是最好的方法.知道怎么做吗?

谢谢.

bash awk

3
推荐指数
1
解决办法
86
查看次数

如何绘制堆积比例图?

我有一个数据框:

x <- data.frame(id=letters[1:3],val0=1:3,val1=4:6,val2=7:9)
  id val0 val1 val2
1  a    1    4    7
2  b    2    5    8
3  c    3    6    9
Run Code Online (Sandbox Code Playgroud)

我想绘制一个堆积条形图,显示每列的百分比.因此,每个条形代表一行,并且每个条形具有长度但具有三种不同颜色,每种颜色代表val0,val1和val2的百分比.

我试着寻找它,我只能获得绘制堆积图但不是堆积比例图的方法.

谢谢.

plot r stacked ggplot2 dataframe

2
推荐指数
1
解决办法
8872
查看次数

R:无法保存情节

我正在生成一个我可以在RMarkdown输出中看到的情节,但每当我试图保存它时,我只得到一个空白(白色)图像.我只是在剧情之前和之后添加以下两行

png("Output.png")
#Plot code
dev.off()
Run Code Online (Sandbox Code Playgroud)

它工作正常.突然它停止了工作.有人可以帮我吗?

编辑

当我这样做的时候 pdf

pdf("output.pdf")
#plot code
dev.off()
Run Code Online (Sandbox Code Playgroud)

我收到的错误是:

There was error opening this document. This document cannot be opened because it has no pages. 
Run Code Online (Sandbox Code Playgroud)

谢谢.

plot r save ggplot2

2
推荐指数
1
解决办法
8893
查看次数

通过链接读取文件

我有一个目录,我保存所有.csv文件.我已经为这个目录创建了一个快捷方式.现在,我想通过这个快捷方式阅读那些csv.

read.csv("<shortcut to directory>/input.csv");
Run Code Online (Sandbox Code Playgroud)

以上命令不起作用.抱怨"无法创建连接"

任何人都可以帮助我吗?

csv r shortcut

2
推荐指数
1
解决办法
365
查看次数

邻接列表中的图表

我有一个邻接列表,我想要对它们进行可视化并对其进行处理.有没有一个包有效地完成它.我看到有很多图表包,但他们之间感到困惑.有人可以帮我吗?

$`825`
[1] 824

$`824`
[1] 823

$`823`
[1] 822

$`822`
[1] 821

$`821`
[1] 820 777

$`820`
[1] 819 816 789 787 785 783

$`777`
[1] 776
Run Code Online (Sandbox Code Playgroud)

以上是邻接清单.下面是我想要的图表.

825
 |
824
 |          _______ 783
823        /
 |        /________ 785
822      /
 |      /__________ 787
821 -- 820
 |      \__________ 789
777      \
 |        \________ 816
776        \
            \______ 819
Run Code Online (Sandbox Code Playgroud)

谢谢.

r graph list adjacency-list

1
推荐指数
1
解决办法
1193
查看次数

标签 统计

r ×6

dataframe ×3

ggplot2 ×3

plot ×2

adjacency-list ×1

apply ×1

awk ×1

bash ×1

bytearray ×1

csv ×1

ctypes ×1

function ×1

graph ×1

list ×1

python ×1

save ×1

shortcut ×1

stacked ×1