小编Ull*_*okk的帖子

我可以将 invoke-restmethod 的结果保存为变量而不是 powershell 中的 -outfile 吗?

我有一个 Invoke-Restmethod API 脚本,它创建一个新的邮件列表并返回以下内容

  Code Message                              Result
  ---- -------                              ------                             
  1    Mailing list successfully created    12345678
Run Code Online (Sandbox Code Playgroud)

我需要结果(新邮件列表的 ID)以进行下一步操作。

我知道我可以使用 -outfile 将结果保存到 txt\xml\json 并使用 get-contents 导入它,但它让我觉得更高效、更干净,只需将结果保存在变量中,而无需保存输出文件并导入它回来了。有办法做到这一点吗?

我的完整代码:

Invoke-RestMethod $url -Method $method -Headers $headers -Body (ConvertTo-json $body) -ContentType "$outform"
Run Code Online (Sandbox Code Playgroud)

powershell

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

Netlogo 如何让每 1000 滴答发生一些事情

我有一个逃税模型,每轮都应该缴纳税款,例如每 1000 个滴答声。作为占位符,我有这个代码

ask traders with [ticks  = 1000 or ticks = 2000 or ticks = 3000];; Can this be set using a seed?
    [reset-parameters
       pay-taxes
       revise-behavior
       reset-turnover]
Run Code Online (Sandbox Code Playgroud)

在 SQL 中,我会做这样的事情:

FOR I IN 1..3000 LOOP 用报价单询问交易者 = I*1000

Netlogo 中是否有类似的功能?关于如何每 1000 滴答发生一次的任何其他提示?

netlogo

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

是否可以在python FPDF中更改PDF的背景颜色?

我正在尝试使用 FPDF 在 python 中创建一个带有彩色背景的 pdf。

有没有办法将背景颜色从白色更改为其他颜色?或者我是否必须插入彩色单元格才能填充整个 pdf?

from fpdf import FPDF

pdf = FPDF()
pdf.add_page()
pdf.set_font("Arial", size=12)
pdf.set_fill_color(248,245,235)
pdf.cell(200, 40,'Colored cell', 0, 1, 'C', fill=True)
pdf.output("test.pdf")
Run Code Online (Sandbox Code Playgroud)

python fpdf

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

我可以在不使用 Shiny 或 Plotly 的情况下在 R 中使用下拉菜单制作线图吗?

我想制作一个简单的销售报告折线图,从下拉菜单中显示给定产品在一段时间内的产品销售情况。我已经使用plotly和shiny做了一个报告,但是我找不到一种方法可以与我的同事分享报告,而不必使用Shiny Server或Shinyapps.IO。理想情况下,我想要一个独立的 html 文件,但我找不到将交互式图形插入 R Markdown 的方法。

这是一个示例数据框:

df = data.frame(month=rep_len(1:12, length.out=12*5), product=rep(1:5, each=12),sales=rnorm(12*5,100,50)) 
Run Code Online (Sandbox Code Playgroud)

以下建议几乎有效,但下拉列表与正确的变量不对应

set.seed(42)
library(plotly)

## Create random data. cols holds the parameter that should be switched
l <- lapply(1:100, function(i) rnorm(100))
df <- as.data.frame(l)
cols <- paste0(letters, 1:100)
colnames(df) <- cols
df[["c"]] <- 1:100


p <- plot_ly(df,
      type = "scatter",
      mode = "lines") %>% 
      add_lines(x = ~c, y=~df[[cols[[1]]]], name = cols[[1]])
## Add arbitrary number of traces
for (col in cols) {
  p <- p %>% add_lines(x …
Run Code Online (Sandbox Code Playgroud)

r shiny plotly

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

标签 统计

fpdf ×1

netlogo ×1

plotly ×1

powershell ×1

python ×1

r ×1

shiny ×1