Chinaunix首页 | 论坛 | 博客

-

  • 博客访问: 4132891
  • 博文数量: 172
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 1923
  • 用 户 组: 普通用户
  • 注册时间: 2018-12-20 14:57
文章分类
文章存档

2021年(19)

2020年(81)

2019年(68)

2018年(4)

我的朋友

分类: 敏捷开发

2021-01-06 09:56:20


1.     循环比较每行记录判断文件是否相同

循环判断,每次在序列最后添加新的成员。

【例 1】 比较两个行数相同的文件中有多少行数据完全一致。文件部分数据如下:

ID Predicted_Y Original_Y
10 0.012388464367608093 0.0
11 0.01519899123978988 0.0
13 0.0007920238885061248 0.0
19 0.0012656367468159102 0.0
21 0.009460545997473379 0.0
23 0.024176791871681664 0.0

SPL脚本】


A B C
1 =file("p_old.csv").import@ct()
/读取第一次输出的文件
2 =file("p_new.csv").import@ct()
/读取第二次输出的文件
3 for A1.len() =cmp(A1(A3),A2(A3)) /循环比较两个文件同行记录的数据
4
=@|B3 /把每次比较的结果与 B4 格值合并
5 =B4.count(~==0)
/统计有多少行数据相等

    A5的执行结果如下:

Value
11302

 

2.     循环赋值

对集合的成员进行循环计算并赋值。

【例 2】 在销售表中,将 2014 年前 10% 的销售员再给予 5% 的业绩奖励。销售表部分数据如下:

OrderID Customer SellerId OrderDate Amount
10400 EASTC 1 2014/01/01 3063.0
10401 HANAR 1 2014/01/01 3868.6
10402 ERNSH 8 2014/01/02 2713.5
10403 ERNSH 4 2014/01/03 1005.9
10404 MAGAA 2 2014/01/03 1675.0

SPL脚本】


A B
1 =connect("db").query("select   * from sales") /连接数据源,读取销售表
2 =A1.select(year(OrderDate)==2014) /选出 2014 年数据
3 =A2.groups(SellerId;sum(Amount):Amount) /按销售员分组汇总当年销售总额
4 =A3.sort@z(Amount).to(A3.len()*0.1) /按销售额降序排列,取前百分之十
5 =A4.run(Amount*=1.05) /使用函数 A.run(),对前百分之十循环,每人给予销售额 5% 的奖励

    A5的执行结果如下:

SellerId Amount
4 150433.185
3 127878.04
1 102756.759
8 87965.346

 

3.     复杂跨行计算

分组统计数据后,对每组分列统计不同的结果,同时跨行计算。

【例 3】根据用户支付数据明细表,统计各个用户 2014 年每月应付金额的汇总表。用户支付数据明细表部分数据如下:

ID customID name amount_payable due_date amount_paid pay_date
112101 C013 CA 12800 2014-02-21 12800 2014-12-19
112102 C013 CA 3500 2014-06-15 3500 2014-12-15
112103 C013 CA 2600 2015-03-21 6900 2015-10-17

要求根据指定年份(如2014),输出每月应付金额,若无当月数据,则当月应付金额为上月该值:

name 1 2 3 4 5 6 7 8 9 10 11 12
CA
12800 12800 12800 12800 16300 16300 16300 16300 16300 16300 16300












SPL脚本】


A B C
1 =file("Payment.txt").import@t().select(year(due_date)==2014)
/从文件中导入 2014 年数据
2 =create(name,${12.().concat@c()}) =A1.group(customID) /A2:生成包含 12 个月的空表。A3:按客户 ID 分组。
3 for B2 =12.(null) /生成 12 个月的空数据
4
>A3.run(B3(month(due_date))=   amount_payable) /设置相应月份的应付金额。
5
>B3.run(~+=~[-1]) /将空值置为前一个月的数值,新增应付款项时累加。
6
=A2.record(B2.name|B3) /将记录插入结果表中。

    A2的执行结果如下:

name 1 2 3 4 5 6 7 8 9 10 11 12
CA
12800 12800 12800 12800 16300 16300 16300 16300 16300 16300 16300












 

4.     最大连续增长天数

在循环计算中,计算某列的连续增长次数。

【例 4】 根据上证指数记录,求 2019 年收盘价增长的最大连续天数。上证指数表部分数据如下:

Date Open Close Amount
2019/12/31 3036.3858 3050.124 2.27E11
2019/12/30 2998.1689 3040.0239 2.67E11
2019/12/27 3006.8517 3005.0355 2.58E11
2019/12/26 2981.2485 3007.3546 1.96E11
2019/12/25 2980.4276 2981.8805 1.9E11

SPL脚本】


A B
1 =file("000001.csv").import@ct() /导入数据文件
2 =A1.select(year(Date)==2019).sort(Date) /选出 2019 年的记录并按日期排序
3 =n=0,A2.max(if(Close>Close[-1],n+=1,n=0)) /循环收盘价,比较每天的收盘价和前日收盘价,如果当日收盘价更高,则计数加 1,最后选出计数最大值。

    A3的执行结果如下:

Value
6

 

5.     嵌套循环

嵌套使用循环函数计算。

【例 5】 百鸡问题,鸡翁一值钱五,鸡母一值钱三,鸡雏三值钱一。百钱买百鸡,问鸡翁、母、雏各几?

 

【SPL 脚本】


A B
1 =to(100/5) /可能购买的鸡翁数量
2 =to(100/3) /可能购买的鸡母数量
3 =33.(~*3) /可能购买的鸡雏数量
4 =create(Cock,Hen,Chick) /创建空表用于存放三种鸡的数量
5 >A1.run(A2.run(A3.run(if(A1.~+A2.~+A3.~==100   && A1.~*5+A2.~*3+A3.~/3==100,A4.insert(0,A1.~,A2.~,A3.~))))) /分别循环鸡翁、鸡母、鸡雏,当满足百钱买百鸡时,将结果插入到 A4 创建的集合中。其中用到了 ~ 符号代表集合循环的当前成员

    A4的执行结果如下:

Cock Hen Chick
4 18 78
8 11 81
12 4 84

 

6.     循环中调用次数

循环查找文本,并按需要生成结果,循环中需要使用循环次数。

【例 6】 根据文本 1 中的关键词,在文本 2 中查找,希望整理为输出结果:

..

【SPL 脚本】


A B
1 =file("file1.txt").read@n() /读取文本 1
2 =file("file2.txt").read@n() /读取文本 2
3 =A1.conj(("Q"+string(#)+"."+~)|A2.select(pos(~,A1.~)).(~.words()(1))) /循环文本 1 中的字符串,在文本 2 中查找,并取第一个英文单词。A2.select 中用到了 ~ 代表 A2 当前成员,A1.~ 代表 A1 的当前成员。每组搜索结果前拼上 Q+A1 的序号 +A1 当前成员,其中序号通过 #取得。

    A3的执行结果如下:

Member
Q1.   like parks
I
Shelly
Harry
Q2.   went out
Shelly
Q3. go   out
I
Ben
Harry

 

7.     循环时按位置统计临近数据

循环计算,计算时按位置计算偏移区间内均值。

【例 7】 根据招商银行的股市交易表,列出 2020 年 1 月 1 日至 10 日每天的 20 日收盘均价。股市交易表部分数据如下:

Date Open Close Amount
2019/12/31 3036.3858 3050.124 2.27E11
2019/12/30 2998.1689 3040.0239 2.67E11
2019/12/27 3006.8517 3005.0355 2.58E11
2019/12/26 2981.2485 3007.3546 1.96E11
2019/12/25 2980.4276 2981.8805 1.9E11

SPL脚本】


A B
1 =connect("db") /连接数据源
2 =A1.query("select Date, Close from   Stock where Code='600036'order by Date") /选出招商银行数据并按日期排序
3 =A2.pselect@a(Date>=date("2020/01/01")   && Date<=date("2020/01/10")) /使用函数 A.pselect() 获取 2020 年 1 月 1 日到 10 日对应记录的序号
4 =A2(A3).derive(A2.calc(A3(#),avg(Close[-19:0])):ma20) /使用函数 calc() 循环计算前十日数据的 20 日均值并返回,计算时使用了 Close[-19:0 获取从过去 19 天到今天的收盘价。

    A4的执行结果如下:

Date Close ma20
2020/01/02 38.88 37.35
2020/01/03 39.4 37.50
2020/01/06 39.24 37.64
2020/01/07 39.15 37.79
2020/01/08 38.41 37.90
2020/01/09 38.9 38.03
2020/01/10 39.04 38.16

 

8.     迭代累加

循环时迭代累加,根据累加值筛选。

【例 8】根据销售表,统计出 2014 年每个月达到 20 笔订单所需天数。销售表部分数据如下:

OrderID Customer SellerId OrderDate Amount
10400 EASTC 1 2014/01/01 3063.0
10401 HANAR 1 2014/01/01 3868.6
10402 ERNSH 8 2014/01/02 2713.5
10403 ERNSH 4 2014/01/03 1005.9
10404 MAGAA 2 2014/01/03 1675.0

SPL脚本】


A B
1 =connect("db").query("select   * from sales") /连接数据源,读取销售表
2 =A1.select(year(OrderDate)==2014) /选出 2014 年数据
3 =A2.sort(OrderDate) /按照订单日期排序
4 =A3.select(seq(month(OrderDate))==20) /使用函数 seq() 计算每个月份的订单序号,并选出每个月序号为 20 的记录

    A4的执行结果如下:

Month Day
1 20
2 20
3 20
4 18

 

9.     分组计算排名

循环中计算分组中的排名。

【例 9】根据员工收入表,求员工在本部门的收入排名。员工收入表部分数据如下:

ID NAME DEPT SALARY
1 Rebecca R&D 7000
2 Ashley Finance 11000
3 Rachel Sales 9000
4 Emily HR 7000
5 Ashley R&D 16000

【SPL 脚本】


A B
1 =connect("db")   .query("select * from Employee order by DEPT, SALARY DESC") /连接数据源,读取员工表并按部门和收入排序
2 =A1.derive(rank(SALARY;DEPT):DeptRank) /对有序的部门和收入利用函数 rank() 编号,计算出各部门排名

    A2的执行结果如下:

ID NAME DEPT SALARY DeptRank
2 Ashley Finance 11000 1
32 Andrew Finance 11000 1
230 Hannah Finance 10000 3
24 Chloe Finance 10000 3

 

10.   分组计算紧凑排名

循环计算分组中的紧凑排名。

【例 10】根据成绩表,求出一班学生 ID 为 8 的学生的各科成绩在本班的排名。成绩表部分数据如下:

CLASS STUDENTID SUBJECT SCORE
Class   one 1 English 84
Class   one 1 Math 77
Class   one 1 PE 69
Class   one 2 English 81
Class   one 2 Math 80

【SPL 脚本】


A B
1 =connect("db")   .query("select * from SCORES where CLASS='Class one'order by SUBJECT,   SCORE DESC") /连接数据源,读取学生成绩表并按学科和成绩排序
2 =A1.derive(ranki(SCORE;SUBJECT):Rank) /对有序的学科和成绩利用函数 ranki() 计算各科成绩的紧凑排名
3 =A2.select(STUDENTID==8) /选出学生 ID 是 8 的学生信息
4 =create(${A3.(SUBJECT).concat@c()}).record(A3.(Rank)) /利用 A3 选出的结果,整理出各科紧凑排名

    A4的执行结果如下:

English Math PE
10 4 14

 

11.   迭代求和

循环计算迭代求和的结果。

【例 11】根据上证指数表,计算 2019 年每个交易日的全年累计成交金额。上证指数表部分数据如下:

Date Open Close Amount
2019/12/31 3036.3858 3050.124 2.27E11
2019/12/30 2998.1689 3040.0239 2.67E11
2019/12/27 3006.8517 3005.0355 2.58E11
2019/12/26 2981.2485 3007.3546 1.96E11
2019/12/25 2980.4276 2981.8805 1.9E11

【SPL 脚本】


A B
1 =file("000001.csv").import@ct() /导入数据文件
2 =A1.select(year(Date)==2019).sort(Date) /选出 2019 年的记录并按日期排序
3 =A2.derive(cum(Amount):CUM) /使用 cum() 函数计算累计成交金额

    A3的执行结果如下:

Date Open Close Amount CUM
2019/01/02 2497.8805 2465.291 9.759E10 9.759E10
2019/01/03 2461.7829 2464.3628 1.07E11 2.046E11
2019/01/04 2446.0193 2514.8682 1.39E11 3.436E11
2019/01/07 2528.6987 2533.0887 1.46E11 4.896E11
2019/01/08 2530.3001 2526.4622 1.23E11 6.126E11

 

12.   自定义迭代计算

循环中使用迭代计算,自行设置迭代中的计算表达式和终止条件。

【例 12】根据销售表数据,统计 2014 年第一季度到哪一天完成了销售总额 15 万的季度目标。销售表部分数据如下:

OrderID Customer SellerId OrderDate Amount
10400 EASTC 1 2014/01/01 3063.0
10401 HANAR 1 2014/01/01 3868.6
10402 ERNSH 8 2014/01/02 2713.5
10403 ERNSH 4 2014/01/03 1005.9
10404 MAGAA 2 2014/01/03 1675.0

SPL脚本】


A B
1 =connect("db").query("select   * from sales") /连接数据源,读取销售表
2 =A1.select(year(OrderDate)==2014) /选出 2014 年数据
3 =A2.iterate((@+=Amount,   ~~=OrderDate),0,@>150000) /使用函数 iterate() 迭代计算,初始值为 0。将销售额累加到当前格,直到超过 15 万终止。函数返回订单日期。

    A3的执行结果如下:

Value
2014/03/25

 

》中还有更多相关计算示例。


阅读(1314) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~