小编Lon*_*NgV的帖子

现在我遇到了 R 问题。我无法在我的电脑中使用 openxlsx 库。当我尝试导入时，这些错误向我表明：

Error: package or namespace load failed for \xe2\x80\x98openxlsx\xe2\x80\x99:\n object \xe2\x80\x98zipr\xe2\x80\x99 is not exported by \'namespace:zip\'\n

任何人都建议我一些不同的方法来保存 xlsx 格式的文件。我尝试了writexl包，但是我不知道如何将文件保存在单独的工作表中，该包中函数 write_xlsx 的描述仅向我展示了这一点：

write_xlsx(\n  x,\n  path = tempfile(fileext = ".xlsx"),\n  col_names = TRUE,\n  format_headers = TRUE\n)\n

假设我有这个数据框:

df = pd.DataFrame({'col1': [1, 2, 3, 4, 5], 
              'col2': [7, 45, 12, 56, 14],
              'col3': [56, 67, 8, 12, 39],
              'col4': [16, np.nan, 25, 6, 19],
              'col5': [1, 9, 23, 56, np.nan],
              'col6': [13, 3, 53, 72, 88]})

我想要的只是计算这个数据帧的偶数列和奇数列的平均值.我试过这些代码:

df['avg_odd'] = df[[df.columns[0],df.columns[2],df.columns[4]]].mean(axis=1)
df['avg_even'] = df[[df.columns[1],df.columns[3],df.columns[5]]].mean(axis=1)

但有没有办法更快地做到这一点？如果我有100列或更多列,我该如何计算？