我真的不得到FUN.VALUE的参数vapply。这是我的示例:
a = list(list(1,2), list(1), list(1,2,3))
# give the lengths of each list in a
sapply(a, length)
Run Code Online (Sandbox Code Playgroud)
现在,我尝试使用vapply代替sapply
# gives me same result as sapply
vapply(a, length, FUN.VALUE=1)
# same result, but why?
vapply(a, length, FUN.VALUE=1000)
# gives me error
vapply(a, length, FUN.VALUE="integer")
# gives me error
vapply(a, length, FUN.VALUE="vector")
# gives me error
vapply(a, length, FUN.VALUE=c(1,2))
Run Code Online (Sandbox Code Playgroud)
据?vapply我了解,它FUN.VALUE可以是标量,向量或矩阵,并且用于匹配输出的类型。任何暗示为什么vapply会这样表现?
我有很多与此类似的公式字符串:
str <- "( (( A ) * J ) - (( J ) * G ) ) / Z "
Run Code Online (Sandbox Code Playgroud)
有许多括号不需要在那里,(A*J - J*G)/Z就足够了.R中是否有功能或包可以解决这个问题?
我尝试了R表达式的函数,as.formula但是没有找到我需要的东西.
在R中有没有办法将列转换为保留列名称的行?
输入示例:
A B
1 1
2 3
3 4
44 5
Run Code Online (Sandbox Code Playgroud)
产量
Group Number
A 1
A 2
A 3
A 44
B 1
B 3
B 4
B 5
Run Code Online (Sandbox Code Playgroud) 我正在使用knitr为一些bash命令制作降价报告.但是,我的操作包括更改目录和在那里创建文件,所以如果我可以cd在我的.Rmd文件中使用它将是理想的:
make a directory
```{r mkdir, engine='bash'}
mkdir mytest
```
cd into directory
```{r cd, engine='bash'}
cd mytest
```
create file
```{r create, engine='bash'}
touch myfile
```
check contents
```{r ls, engine='bash'}
ls
```
Run Code Online (Sandbox Code Playgroud)
但是,该文件myfile是在我使用knit而不是编译文档的目录中创建的mytest.我想为每个代码块启动一个新的bash shell.
我已经看过有关cwd在R(https://github.com/yihui/knitr/issues/277)中进行设置的讨论,但对于bash没有.
有没有办法为代码块设置工作目录?
我试图在整数数组中搜索一系列数字.例如,如果数组由数字组成1,2,3,10,12,14,则可以将其汇总为
1到3,偏移量为1,
偏移2为10到14
在我的代码下面,我从第二个元素循环遍历数组,跟踪连续数组元素之间的偏移量,如果偏移量发生变化,则创建一个新的"系列":
use strict;
use warnings;
my @numbers = (1,2,3,10,12,14); #array to extract series from
my $last_diff;
my $start = $numbers[0];
my $end;
my @all_series; #array will hold all information on series
for my $i (1..($#numbers+1)){
my $diff;
if ($i <($#numbers+1)){
$diff = $numbers[$i] - $numbers[$i-1];
}
if (!$diff || ( $last_diff && ($last_diff != $diff)) ) {
$end = $numbers[$i-1];
my $series = { 'start'=> $start,
'end' => $end,
'offset'=> $start == $end ? 1 …Run Code Online (Sandbox Code Playgroud) 我想在我的网站上添加一个项目最新github版本的下载链接.例如,链接https://github.com/mongodb/mongo/archive/r3.0.0-rc7.zip确实链接到最新版本(截至今天),但我不想硬编码版本号网站.
我发现了几个关于这个问题的问题,使用curl,ajax或php的答案.
我使用ajax尝试了使用github发布API的解决方案:
<!DOCTYPE html>
<HTML> <BODY>
<script language="javascript" type="text/javascript">
$(document).ready(function () {
GetLatestReleaseInfo();
});
function GetLatestReleaseInfo() {
$.getJSON("https://github.com/mongodb/mongo/releases").done(function (json) {
var release = json[0];
var asset = release.assets[0];
var downloadURL = "https://github.com/mongodb/mongo/releases" + release.tag_name + "/" + asset.name;
$(".mongodb-download").attr("href", downloadURL);
});
}
</script>
<a href="GetLatestReleaseInfo();">Link</a>
<a href="" onclick="location.href=this.href+downloadURL;return false;">Link2</a>
<a href="" onclick="location.href=this.href+mongodb-download;return false;">Link3</a>
</BODY>
</HTML>
Run Code Online (Sandbox Code Playgroud)
但我无法正确调用javascript函数,因为它似乎在我的上面尝试(Link,Link2和Link3).我对javascript或ajax不太熟悉,所以我很感激任何帮助; 也许没有Ajax有一种更简单的方法?
我想合并2 df的在df1中包含2列和df2 1列,在这种情况下如何应用函数合并?
以下是示例案例:
df1 <- data.frame(var1=letters[1:5],var2=letters[6:10])
df2 <- data.frame(var3=letters[1:10])
Run Code Online (Sandbox Code Playgroud)
错误尝试:
merge(df1,df2,by.x=c("var1","var2"),by.y="var3",all.y=TRUE)
Run Code Online (Sandbox Code Playgroud)
如何合并这两个df,以便匹配搜索使用df1(var1和var2)的两列并在df2(var3)上运行?
期望的输出:
var1 var2 var3
1 a f a
2 b g b
3 c h c
4 d i d
5 e j e
6 <NA> <NA> f
7 <NA> <NA> g
8 <NA> <NA> h
9 <NA> <NA> i
10 <NA> <NA> j
Run Code Online (Sandbox Code Playgroud)
编辑:改进数据(我希望):
df1 <- data.frame(var1=c(letters[1:5],rep("x",5)),var2=c(letters[6:10],rep("x",5)))
df2 <- data.frame(var3=letters[1:10])
Run Code Online (Sandbox Code Playgroud)
期望的输出:
var1 var2 var3
1 a f a
2 b g b
3 c h c …Run Code Online (Sandbox Code Playgroud) 是否可以直接通过锚点通过swagger-ui访问模型定义?
在示例页面http://petstore.swagger.io/中,我看到锚适用于一组端点,例如 http://petstore.swagger.io/#/pet。
将鼠标悬停在模型描述上会显示一个锚点(例如,#/definitions/Category用于Category模型),但是
http://petstore.swagger.io/#/definitions/Category不能将我带到那里。
如果检查元素,则会看到一个真正的锚链接pet:
<a class="nostyle" href="#/pet"><span>pet</span></a>
而Category这是一个模型提示:
<span class="model-hint">#/definitions/Category</span>
所以我想知道是否完全支持锚定模型。
我有一个通过 http POST 接受图像文件的网络服务,我用 发送它们curl,例如:
curl -X POST -F "image=@ta1.jpeg" -F "image=@ta2.jpeg" http://domain.tld/upload
Run Code Online (Sandbox Code Playgroud)
我正在尝试使用 apache bench ( ab) 来测试并发请求。我看到ab可以选择-p发布数据,但我认为这需要 JSON 内容...我尝试使用postmanecho 服务将图像编码为 JSON:
curl -X POST -F "image=@ta1.jpeg" -F "image=@ta2.jpeg" http://www.postman-echo.com/post
Run Code Online (Sandbox Code Playgroud)
将输出保存到文件,并使用 的ab选项发送该文件-p,但会产生服务器错误。
有关如何使用 apache bench 测试 POSTing 图像的任何提示吗?
r ×6
dataframe ×2
javascript ×2
ajax ×1
anchor ×1
apachebench ×1
apply ×1
arrays ×1
bash ×1
cd ×1
extract ×1
formula ×1
github ×1
github-api ×1
html ×1
http ×1
http-post ×1
image ×1
knitr ×1
list ×1
markdown ×1
parentheses ×1
pca ×1
perl ×1
plot ×1
post ×1
sequence ×1
string ×1
swagger ×1
swagger-ui ×1