我是R的新人,我正在尝试做一些非常简单的事情.我加载了一个包含四列的txt文件,现在我想得到第二列的最小值.这是我的代码:
## Choose the directory of the file
setwd("//Users//dkar//Desktop")
## Read the txt file
data<-read.table("export_v2.txt",sep="",header=T)
str(data)
## this command gives me the minimum for all 4 columns!!
a<-apply(data,2,min)
Run Code Online (Sandbox Code Playgroud)
实际上,如果我想做这样的事情:min(data(:,2)).但我不知道如何在R中做到这一点.任何帮助?
我正在尝试使用php和curl向Web服务器发送请求.我之前没有做过类似的事情,虽然网上有很多很好的例子,但我对理解一些curl命令有些困难.
这就是我想要做的:有一个已建立的Web服务(例如:Web地图服务),我希望我的php代码向此服务发送一个发布XML请求.作为回应,我想获得一个XML文件.
这就是我现在所拥有的:
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, '');
/*curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: text/xml'));*/
/* curl_setopt($ch, CURLOPT_HEADER, 0);*/
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $xml);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 0);
/*curl_setopt($ch, CURLOPT_REFERER, '');*/
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
$ch_result = curl_exec($ch);
curl_close($ch);
echo $ch_result;
Run Code Online (Sandbox Code Playgroud)
正如我所说,我在php中也很新,也使用curl,我想我缺少一些概念.我的问题是:1)我必须放入的字符串(链接)是什么:
curl_setopt($ch, CURLOPT_URL, '');
Run Code Online (Sandbox Code Playgroud)
它是我要发送请求的服务的主机名吗?
2)在第6行中,变量$ xml包含我要作为请求发送的xml文件.它是正确的还是这个变量应该包含其他内容?
3)在哪些情况下我需要使用httpheader或header(row3和row4);
谢谢您的帮助.季米特里斯
我遇到了一个非常奇怪的问题.我尝试从我的github fork中安装一个包.我过去曾多次这样做过,总是有效.
这就是我做的:
pip install git+https...@my_branch
Run Code Online (Sandbox Code Playgroud)
虽然这在我的本地机器上完美运行,但当我尝试使用Windows远程计算机和我的Ubuntu Vagrant盒时,它不起作用.
它不是使用my_branch安装软件包,而是安装master分支.最初我认为这与过时版本的pip有关,但在升级到最新版本后,我一直面临同样的问题.
有什么想法是什么问题?
我有一个有400万行的表,我用psycopg2来表示:
SELECT * FROM ..WHERE query
Run Code Online (Sandbox Code Playgroud)
我之前没有听说过服务器端光标,当你期待很多结果的时候我正在阅读它.
我发现文档有点受限,我有一些基本问题.
首先,我将服务器端游标声明为:
cur = conn.cursor('cursor-name')
Run Code Online (Sandbox Code Playgroud)
然后我执行查询:
cur.itersize = 10000
sqlstr = "SELECT clmn1, clmn2 FROM public.table WHERE clmn1 LIKE 'At%'"
cur.execute(sqlstr)
Run Code Online (Sandbox Code Playgroud)
我的问题是:我现在该怎么办?我如何得到结果?
我是否遍历行:
row = cur.fetchone()
while row:
row = cur.fetchone()
Run Code Online (Sandbox Code Playgroud)
或者我使用fetchmany(),我这样做:
row = cur.fetchmany(10)
Run Code Online (Sandbox Code Playgroud)
但在第二种情况下,我如何"滚动"结果?
itersize有什么意义呢?
我用过这段代码:
dictionary = dict(zip(list1, list2))
Run Code Online (Sandbox Code Playgroud)
为了在字典中映射两个列表.哪里:
list1 = ('a','b','c')
list2 = ('1','2','3')
Run Code Online (Sandbox Code Playgroud)
字典等于:
{'a': 1, 'c': 3, 'b': 2}
Run Code Online (Sandbox Code Playgroud)
有没有办法添加第三个列表:
list3 = ('4','5','6')
Run Code Online (Sandbox Code Playgroud)
这样字典将等于:
{'a': [1,4], 'c': [3,5], 'b': [2,6]}
Run Code Online (Sandbox Code Playgroud)
必须添加第三个列表,以便它遵循现有映射.
我们的想法是在for循环中迭代地完成这项工作,并为正确映射的关键字提供几十个值.这样的事情可能吗?
希望我的问题很清楚.
我正在尝试编写一个代码,它将在我的XML文件中找到一个特定元素,然后更改文本节点的值.XML文件具有不同的名称空间.到目前为止,我已经设法注册了名称空间,并且还回显了我想要更改的元素的文本节点.
<?php
$xml = simplexml_load_file('getobs.xml');
$xml->registerXPathNamespace('g','http://www.opengis.net/gml');
$result = $xml->xpath('//g:beginPosition');
foreach ($result as $title) {
echo $title . "\n";
}
?>
Run Code Online (Sandbox Code Playgroud)
我的问题是:如何使用SimpleXML更改此元素的值?我尝试使用nodeValue命令,但我无法使其工作.
这是XML的一部分:
<sos:GetObservation xmlns:sos="http://www.opengis.net/sos/1.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" service="SOS" version="1.0.0" srsName="urn:ogc:def:crs:EPSG:4326">
<sos:offering>urn:gfz:cawa:def:offering:meteorology</sos:offering>
<sos:eventTime>
<ogc:TM_During xmlns:ogc="http://www.opengis.net/ogc" xsi:type="ogc:BinaryTemporalOpType">
<ogc:PropertyName>urn:ogc:data:time:iso8601</ogc:PropertyName>
<gml:TimePeriod xmlns:gml="http://www.opengis.net/gml">
<gml:beginPosition>2011-02-10T01:10:00.000</gml:beginPosition>
Run Code Online (Sandbox Code Playgroud)
谢谢迪米特里斯
我有一组节点,它们通过以下方式相关:
A --> B --> C --> D
Run Code Online (Sandbox Code Playgroud)
该关系是与某个 id 属性的“连接”关系。我的问题是:我可以编写一个 cypher 查询,它将显示从起始节点 A 到起始节点 D 的每个关系的所有 id 属性,而不在查询中提及其间的任何节点。
谢谢迪米特里斯
我有一个带有循环的脚本,我在其中执行 PHP 地理编码器函数。循环有 1000 多次迭代,整个过程需要一些时间。这是我的脚本:
for ($x = 0; $x < 1000; $x++) {
////////////////////////////////////////////////////
// GECODE THE ADRESS AND GET THE COORDS
$curl = new \Ivory\HttpAdapter\CurlHttpAdapter();
$geocoder = new \Geocoder\Provider\BingMaps($curl,$bingApikey);
//$geocoder = new \Geocoder\Provider\MapQuest($curl,$mapQuestApikey);
//$geocoder = new \Geocoder\Provider\ArcGISOnline($curl);
//$geocoder = new \Geocoder\Provider\OpenStreetMap($curl);
$result = $geocoder->geocode($matchesAdressRightValues[$x][0]);
if (count($result)==0 || count($result)>1 ){
$bingSucUn = 'not_success';
array_push($arraySucUnsucBing,$bingSucUn);
}
else {
//echo ('result');
//echo (count($result));
//echo ('Endresult');
$bingSucUn = 'success';
array_push($arraySucUnsucBing,$bingSucUn);
}
//var_dump($result);
////////////////////////////////////////////////////
} // end for
Run Code Online (Sandbox Code Playgroud)
问题是我收到一个错误:
("Connection timed out after …Run Code Online (Sandbox Code Playgroud) 我试图在R中编写一个使用gstat库的代码来创建插值.我已经阅读了gstat手册,基于互联网上的一些例子,我设法编写了这段代码(这只是一部分):
g <- gstat(id="tec", formula=TEC ~ 1, data=data) ##I create an object
v <- variogram(g) # plot the empirical variogram
plot(v)
mod<-vgm(sill=var(data$TEC),model="Sph",range=200,nugget=200) #create the variogram model
v.fit <- fit.variogram(v, model=mod,fit.method=1) #fit the empirical variogram
Theor_variogram=plot(variogram(g),v.fit,main="WLS Model") #plot the theoretical variogram
plot(Theor_variogram)
## Kriging interpolation
p <- predict.gstat(g, model=v.fit, newdata=predGrid)
Run Code Online (Sandbox Code Playgroud)
我的问题是,当我运行最后一个命令(预测)而不是通过普通克里金插值得到结果时,我得到一个反距离加权(IDW).我在gstat手册中读到:"当没有指定变异函数时,反距离加权插值是默认操作.当指定变异函数时,默认预测方法是普通克里金法."
但是,正如您在我的代码中所看到的,我指定了经验和理论变差函数.你知道我为什么一直得到IDW而不是普通克里金吗?它可以与我的坐标类型相关吗?例如,如果我的坐标彼此接近,或者感兴趣的区域太大?任何帮助都非常有用.
在此先感谢迪米特里斯
我有一个带有列表的字典,我正在尝试迭代它,而在我的Django模板中.
这就是我的字典:
{u'Canada': [u'Saskatchewan', u'Nunavut', u'Nova Scotia / Nouvelle-\xc9cosse', u'Prince Edward Island / \xcele-du-Prince-\xc9douard', u'Northwest Territories / Territoires du Nord-Ouest', u'Ontario', u'Alberta', u'New Brunswick / Nouveau-Brunswick', u'Newfoundland and Labrador / Terre-Neuve-et-Labrador', u'British Columbia / Colombie-Britannique', u'Manitoba', u'Yukon', u'Quebec / Qu\xe9bec'], u'Sao Tome and Principe': [u'Principe', u'Sao Tome'],
Run Code Online (Sandbox Code Playgroud)
问题是如何将这个字典传递给我的模板,而不必让django转义字符并迭代每个国家的所有值.
现在我在上下文字典中传递它:
ctx['regions'] = cntr_rgns
Run Code Online (Sandbox Code Playgroud)
然后我尝试在模板中迭代它:
{% if regions %}
{% for cntr, rgn in regions.items %}
<option value={{ region }}>{{ rgn }}</option>
{% endfor %}
{% endif %}
Run Code Online (Sandbox Code Playgroud)
但是这样我只得到整个数组而不是每一个元素.