Question

我有一个名为StringIO的数据框，其中包含50行12列我想按行添加值，以便：

report_name_zip = 'do_something_%(username)s_%(current_date)s.zip'

report_name = "do_something_%(username)s_%(current_date)s.xls"

f1 = StringIO.StringIO()
work_book.save(f1)

f2 = StringIO.StringIO()
with zipfile.ZipFile(f2, mode='w', compression=zipfile.ZIP_DEFLATED) as zf:
    zf.writestr(zinfo_or_arcname=report_name, data=f1.getvalue())

message.attach(report_name_zip, f2.getvalue())
message.send()

以此类推。

我尝试了以下操作：

AD

这里有个例子：

AD[1,2] <- AD[1,1] + AD[1,2]
AD[1,3] <- AD[1,2] + AD[1,3]

我想拥有：

for (i in nrow(AD)) {
for (j in ncol(AD)) {
AD[i,j] <- AD[i,j] + AD[i,j-1] }}

Answer 1

执行以下操作：：）

> AD <-data.frame(a = c(1:6),
+            b = c(2,3,0,5,0,7),
+            c=  c(3:8))
> for(i in 1:nrow(AD)){
+   AD[i,2] <- AD[i,1] + AD[i,2]
+   AD[i,3] <- AD[i,2] + AD[i,3]
+   
+ }
> AD
  a  b  c
1 1  3  6
2 2  5  9
3 3  3  8
4 4  9 15
5 5  5 12
6 6 13 21

两列的累计值之和

1 个答案: