小编ene*_*ene的帖子

用插入符号库预测GBM的概率

然而,一个类似的问题被问到答案中的链接指向随机森林的例子,它似乎在我的情况下不起作用.

这是我正在尝试做的一个例子:

gbmGrid <-  expand.grid(interaction.depth = c(5, 9),
                    n.trees = (1:3)*200,
                    shrinkage = c(0.05, 0.1))

fitControl <- trainControl(
                       method = "cv",
                       number = 3,
                       classProbs = TRUE)

gbmFit <- train(strong~.-Id-PlayerName, data = train[1:10000,],
             method = "gbm",
             trControl = fitControl,
             verbose = TRUE,
             tuneGrid = gbmGrid)
gbmFit
Run Code Online (Sandbox Code Playgroud)

一切顺利,我得到最好的参数.现在,如果我做预测:

predictStrong = predict(gbmFit, newdata=train[11000:50000,])
Run Code Online (Sandbox Code Playgroud)

我得到了一个预测的二元向量,这很好:

[1] 0 1 0 0 1 0 0 0 0 0 0 0 1 1 0 0 1 1 1 0 0 0 1 ...
Run Code Online (Sandbox Code Playgroud)

但是,当我尝试获取概率时,我收到一个错误: …

r r-caret

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

从列表中操作复选框

我想创建一个简单的接口,用于从Mathematica中具有大量列的数据库中为较少数量的列进行SQL SELECT查询.
我有我的列名列表,例如:

dbColumnNames={"name1","name2","name3",...."nameN"}
Run Code Online (Sandbox Code Playgroud)

我想要做的是为这个列表中的每个元素设置一个与列表元素相同的复选框,并在选中时检查列表是否已选中列名.
例如,我点击"name1","name50","name74",列表应如下所示:

selectedNames={"name1","name50","name74"}
Run Code Online (Sandbox Code Playgroud)

如果我有该列表,则很容易创建SQL查询字符串.

wolfram-mathematica

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

如何修剪给定长度以上的字符串中的所有单词?

例如,这匹配长度为3或更长的每个单词,并将其替换为xx:

library(stringr)
str_replace_all(c("This is a long", "Another one."), "([a-zA-Z]{3,})", "xx")
#output: "xx is a xx" "xx xx"
Run Code Online (Sandbox Code Playgroud)

我想得到的是:

#"Thi is a lon" "Ano one."
Run Code Online (Sandbox Code Playgroud)

regex r

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

在颜色图和颜色条中为两个(或更多)特定值添加单独的颜色

我想在颜色图中显示矩阵,并为两个或更多特殊值指定特定颜色.

import numpy as np
from pylab import *

np.random.seed(10)    
a=np.random.randint(-1,10, size=(5, 5))
print a

fig, ax = plt.subplots()
mat=ax.matshow(a, cmap=cm.jet, vmin=1, vmax=10)
colorbar(mat)
show()
Run Code Online (Sandbox Code Playgroud)

以下是a矩阵的值:

[[ 8  3 -1  0  8]
 [-1  0  9  7  8]
 [-1  9  7  5  3]
 [ 2 -1  3  5  7]
 [ 9  0  7  3  0]]
Run Code Online (Sandbox Code Playgroud)

这是情节: 在此输入图像描述
我想为所有-1个条目分配黑色,为所有0个条目分配白色,我希望它在第一个下面的颜色条上显示为两个离散颜色.这是一个例子,我的照片编辑技巧很差,但应该清楚我想要的东西(颜色条应该是比例尺):
在此输入图像描述 有一个连续的jet彩色地图对我来说并不重要,我会满意的解决方案,我的颜色条将是离散的,并由例如10种颜色组成,其中两种颜色是黑色和白色,8种jet颜色映射颜色颜色.然而,重要的是-1和0具有不同的颜色,无论值的总范围是多少.
例如,如果值范围是-1到1000:
在此输入图像描述

python numpy matplotlib

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

将数据从Mathematica插入mysql作为blob

在php中,您可以将图片作为blob数据类型插入数据库.我想将数据块作为blob数据类型放入数据库中,这样我就可以使用php在Web上重用这些数据.
例如:

Needs["DatabaseLink`"];
conn=OpenSQLConnection["myDB"];
picture=Plot[Sin[x], {x,0,2Pi}];
SQLExecute[conn, "INSERT INTO pictures VALUES ('"<>picture<>"')"]
Run Code Online (Sandbox Code Playgroud)

mysql wolfram-mathematica

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

在Mathematica中选择[nested_list,condition]

假设我有一个清单:

list=Table[{RandomReal[],RandomReal[],RandomReal[]}, {i,1,100}];
Run Code Online (Sandbox Code Playgroud)

我想根据条件制作一个新的清单.现在我已经看到我应该使用该Select函数,但我不明白如何定义选择应该基于嵌套列表的某些元素的条件.
有人问了一个类似的问题,我喜欢的答案是:

data = {{0,2},{2,3},{4,3},{5,4},{8,4}};
filtered = Select[data, First[#]>3&];
Run Code Online (Sandbox Code Playgroud)

但是,只有在子列表的第一个元素上设置条件时,这才有效.就我而言:

Select[list,0.2>First[#]>0.1&]
Run Code Online (Sandbox Code Playgroud)

给列表中的所有成员1.子列表的元素在0.1和0.2之间.但是,如果我想根据子列表的第二个元素进行选择,或者通常对第n个元素进行选择呢?
另外,元素组合的示例将是很好的,例如,子列表的前2个元素的总和小于0.5.

wolfram-mathematica nested-lists conditional-statements

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