循环运算

于 2021-01-06 14:40:27 发布
阅读量694 收藏
点赞数
分类专栏： 集算器
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/raqsoft/article/details/112272492
版权

【摘要】
    循环运算是指按照一定的次序对集合的成员进行计算。除了在循环中访问当前成员、对成员赋值等简单的计算，还有在循环中进行跨行计算、嵌套循环、迭代运算等复杂需求。如何简便快捷的处理循环运算，这里为你全程解析，并提供 esProc 示例代码。循环运算

 

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

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

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

IDPredicted_YOriginal_Y
100.0123884643676080930.0
110.015198991239789880.0
130.00079202388850612480.0
190.00126563674681591020.0
210.0094605459974733790.0
230.0241767918716816640.0
………

【SPL脚本】

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

    A5的执行结果如下：

Value
11302

 

2.     循环赋值

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

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

OrderIDCustomerSellerIdOrderDateAmount
10400EASTC12014/01/013063.0
10401HANAR12014/01/013868.6
10402ERNSH82014/01/022713.5
10403ERNSH42014/01/031005.9
10404MAGAA22014/01/031675.0
……………

【SPL脚本】

 AB
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的执行结果如下：

SellerIdAmount
4150433.185
3127878.04
1102756.759
887965.346

 

3.     复杂跨行计算

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

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

IDcustomIDnameamount_payabledue_dateamount_paidpay_date
112101C013CA128002014-02-21128002014-12-19
112102C013CA35002014-06-1535002014-12-15
112103C013CA26002015-03-2169002015-10-17

要求根据指定年份（如2014），输出每月应付金额，若无当月数据，则当月应付金额为上月该值：

name123456789101112
CA 1280012800128001280016300163001630016300163001630016300
…            

【SPL脚本】

 ABC
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 分组。
3for B2=12.(null)/生成 12 个月的空数据
4 >A3.run(B3(month(due_date))=   amount_payable)/设置相应月份的应付金额。
5 >B3.run(~+=~[-1])/将空值置为前一个月的数值，新增应付款项时累加。
6 =A2.record(B2.name|B3)/将记录插入结果表中。

    A2的执行结果如下：

name123456789101112
CA 1280012800128001280016300163001630016300163001630016300
…            

 

4.     最大连续增长天数

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

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

DateOpenCloseAmount
2019/12/313036.38583050.1242.27E11
2019/12/302998.16893040.02392.67E11
2019/12/273006.85173005.03552.58E11
2019/12/262981.24853007.35461.96E11
2019/12/252980.42762981.88051.9E11
…………

【SPL脚本】

 AB
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 脚本】

 AB
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的执行结果如下：

CockHenChick
41878
81181
12484

 

6.     循环中调用次数

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

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

..

【SPL 脚本】

 AB
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 日收盘均价。股市交易表部分数据如下：

DateOpenCloseAmount
2019/12/313036.38583050.1242.27E11
2019/12/302998.16893040.02392.67E11
2019/12/273006.85173005.03552.58E11
2019/12/262981.24853007.35461.96E11
2019/12/252980.42762981.88051.9E11
…………

【SPL脚本】

 AB
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的执行结果如下：

DateClosema20
2020/01/0238.8837.35
2020/01/0339.437.50
2020/01/0639.2437.64
2020/01/0739.1537.79
2020/01/0838.4137.90
2020/01/0938.938.03
2020/01/1039.0438.16

 

8.     迭代累加

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

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

OrderIDCustomerSellerIdOrderDateAmount
10400EASTC12014/01/013063.0
10401HANAR12014/01/013868.6
10402ERNSH82014/01/022713.5
10403ERNSH42014/01/031005.9
10404MAGAA22014/01/031675.0
……………

【SPL脚本】

 AB
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的执行结果如下：

MonthDay
120
220
320
418
……

 

9.     分组计算排名

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

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

IDNAMEDEPTSALARY
1RebeccaR&D7000
2AshleyFinance11000
3RachelSales9000
4EmilyHR7000
5AshleyR&D16000
…………

【SPL 脚本】

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

    A2的执行结果如下：

IDNAMEDEPTSALARYDeptRank
2AshleyFinance110001
32AndrewFinance110001
230HannahFinance100003
24ChloeFinance100003
……………

 

10.   分组计算紧凑排名

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

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

CLASSSTUDENTIDSUBJECTSCORE
Class   one1English84
Class   one1Math77
Class   one1PE69
Class   one2English81
Class   one2Math80
…………

【SPL 脚本】

 AB
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的执行结果如下：

EnglishMathPE
10414

 

11.   迭代求和

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

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

DateOpenCloseAmount
2019/12/313036.38583050.1242.27E11
2019/12/302998.16893040.02392.67E11
2019/12/273006.85173005.03552.58E11
2019/12/262981.24853007.35461.96E11
2019/12/252980.42762981.88051.9E11
…………

【SPL 脚本】

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

    A3的执行结果如下：

DateOpenCloseAmountCUM
2019/01/022497.88052465.2919.759E109.759E10
2019/01/032461.78292464.36281.07E112.046E11
2019/01/042446.01932514.86821.39E113.436E11
2019/01/072528.69872533.08871.46E114.896E11
2019/01/082530.30012526.46221.23E116.126E11
……………

 

12.   自定义迭代计算

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

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

OrderIDCustomerSellerIdOrderDateAmount
10400EASTC12014/01/013063.0
10401HANAR12014/01/013868.6
10402ERNSH82014/01/022713.5
10403ERNSH42014/01/031005.9
10404MAGAA22014/01/031675.0
……………

【SPL脚本】

 AB
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

 

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

润乾软件
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
博客
给 BIRT 的 SQL 数据集传多值参数
02-03 573
但预览结果看不到数据，原因在于JDBC因为“预防SQL注入”的安全问题，禁止了这种多值参数的传值方式。arg1相当于第一个问号，然后看结果，能查出数据来了。
博客
SQL 多字段条件查询
02-02 999
SPL语言从理论模型上做了大量的这类创新，能极大的提高描述计算的能力，可以想象掌握了 SPL 语言的你，一个人维护的。=A2.select(pos(~.array().concat(","),"北京 ")!（可以理解为 JAVA 里的数组，只是这个数组比较广义，元素可以是任意数据类型）；还可以依次类推，~[-1] 是前一条记录,~[3] 是当前记录后面的第三条记录;=A2.select((~.销售额 -~[1]. 销售额 )>100000)pos(~.array().concat(","),"北京 ")
博客
SQL 分组条件深入剖析
01-19 2330
才导致自然而然的解题思路，能说的出，想得明白，但就是写不出相应的计算机语言。这一系列设计上的缺陷，造成了 SQL 的编写、维护、性能调优都成倍的增加工作量。集算器的 SPL 语言从根源上弃用了 SQL 背后的关系代数理论，发明新的离散数据集理论解决程序员描述计算的困难。追根溯源，上面 SQL 反映出来的问题，它缺少单纯的分组动作，不能显式的表达每个小分组，进而对每个小分组的更细致操作就无法直观表达。1、 按设备分组，找到每个设备下Ready的个数c1；2、 按设备分组，找到每个设备下所有状态的个数c2；
博客
多步骤复杂 SQL 优化实例
01-18 802
稍微复杂点的查询需求，写SQL就会是个烧脑的过程，除了证明我们人脑很聪明，逻辑思维能力强之外，剩余的就全是缺点，每个人经常用不同于其他人思路的方式绕行到同一个结果上，个性化这么强的编程方式，导致编写SQL、阅读SQL、调试SQL都很困难，维护成本也大大增高。在程序员编程描述计算这件事上，集算器 SPL 语言通过创新的数学理论模型《离散数据集》，大大改善《关系代数》（SQL背后的数学模型）在描述计算时的困难。简单的说是对有序计算更彻底的集合运算提倡分步等多方面创新，达到。
博客
集算器读写 json
01-17 209
在 json 文件中有上述内容，欲将其中的 results 取出并输出成新的 json 文件。A2：将 A1 的 results 字段导出成 json 字符串。A1: 读取 json 文件成字符串，导入为序表。A3：输出 json 串到文件中。
博客
解析 json，整理分散数据入库
01-16 760
根据 B5.SERVICES 记录里的字段数量循环，每个字段的名字可以在 C7 获得，每个字段的值可在 C8 取到。到此我们可以获得开篇所述“GROUPNAME”值、”SERVICES”中的键编号和“SERVICES”的值。“GROUPNAME”值、”SERVICES”中的键编号对应了数据库表 _groups 的 Groupname 和 ID。“LIST”中包含多个子孙记录，主要目标是”GROUPNAME”、”SERVICES”。“SERVICES”每个值对应数据库表 Services 中的一条记录。
博客
用集算器比较字符串相似性
01-13 474
1、有 1001 个数字串（每个数字串长度不等，都是 0~9 之内），每一个数字串都和另外 1000 个中找出相同数最多和不同数最多的数字串（等于 1001 个数字数字串都要找一次）如果只有第 1 行数字串含有 1，而第 1001 行数字串没有，算是不同数有 1 个；D7：计算 A4 与 diff 的差为 same 的值，循环并总是存下最大值，循环 2 结束。B5：循环 2，遇到成员 1 时候跳过，取成员 2 与成员 1 比较数字字符。B4：循环 1 的变量，初始为 0，记录比较的结果不同数与相同数。
博客
行转列，动态列枚举分组
01-12 399
Mongodb 不直接支持行转列，枚举分组做起来也很麻烦，要把数据读出来再用 Java、Php 等编程语言来实现；以下例子不使用 MongoDB 展现，如果使用 MongoDB 需要用 SPL 的 mongo_open()函数连接数据库，用 mongo_shell() 函数查询原始数据结构。B8、C8：根据 subs 循环，将 A4 中单个学校各科的学生成绩统计出来并按顺序拼接成序列。A5、B5、A6：生成结果表，结构是 school、sub1_5、sub1_4…sub1_1、sub2_5、sub2_4…
博客
MongoDB 导出数据成 csv
01-11 404
将 MongoDB 中的多层数据导出为结构化二维数据，实现这种算法要考虑大数据的处理，结构化数据计算，用 python 实现存在一定难度。
博客
动态 json 转化序表
01-10 770
A1：将 json 文件读成文本，导入成序表。可以看出 A1 此时相当于按照 custName 分组的目标结果表。A2：用对 A1 用 news 函数解析出 custCars 序表，合并到 A1。
博客
mongodb 中做 join 的方法
01-09 910
用 Mongodb 是不支持 join 查询的, 要多次查询很不方便。可以考虑配合 mongodb 使用的本身有计算能力的工具，比如使用 SPL。通过 employee 文档和 seller 文档查询 employee.state 为 California 的 sales orders。A4：选出满足条件的结果，订单 1、3 都属于来自 California 的雇员 1。
博客
查找满足条件的子记录并合并
01-06 218
问题是，要将 mongodb 中的一系列字符串记录按照逗号分割的首个数字值筛选。A4：将每个字符串成员转成序列，取第一个子成员，根据其选择数据。A3：找到需要计算的数据序列。
博客
筛选用户权限子集记录
01-05 401
A4：对照 A2 每条记录的 au 是不是 A3 的子集，如果是就查出来。
博客
mongodb 分组子文档合并
01-04 587
A4：每组数据的 acls 列内数据合并成一个序列，作为 readUser 保存。A3：数据根据 name 分组。
博客
对序表记录固定排序
01-03 497
A2：使用 align 函数把 A1 按照排序依据进行排序 / 对齐。[300,200,100,400] 可以是外部参数（假设命名为 list），A2 的代码则可以改为 A1.align@s(list,PRODUCT_ID)集算器提供 JDBC 接口，可以像数据库一样使用，
博客
组内每隔 5 行加一个分隔线
12-30 858
BIRT 可通过 JDBC 访问集算器，可以像数据库一样使用，参考。：在组内每隔 5 行设一个标签。
博客
文本中按规则分组区段随机抽样
12-29 356
A1:读入文件，第一行作为列名，并设置SessionDate、Start和End的数据类型，最后将SessionDate和Start拼成完整日期DateStart。A2:将A1按Easting,Northing分组，循环每一组。循环体即缩进的B2-D4，可用A2来引用循环变量。类似地，B3的循环体是C3-D4。C4-D4:如果C3过滤的结果不空，则随机取记录存入B2，并将该记录追加到D4。C3:第1组(B2==null)数据直接返回，否则过滤出与B2间隔大于6小时的记录。B3:循环C3每组数据。
博客
拆串后结构化，其中按行对齐
12-28 385
直观的办法是两个文件按行JOIN起来，用计算列就能获得sku。A1：读取文本文件的内容，将每一行作为一个成员返回成序列。A2：读取文本文件的内容，将每一行作为一个成员返回成序列。A3：拆出A2中的sku，并和A1进行连接。这段代码可以方便地集成进Java（参考。
博客
动态列合并更新
12-27 850
提问者需要将两表的一些列进行合并，将 B 表的一些列更新到 A 表。题目中已经给出了 MERGE 语句的写法，难点在于他需要合并的列数是动态的。A2、A3：查询 A 表、B 表，设置 id 为序表主键。A4：按 id 合并两表去重，保留 B 中的记录。A2：查询 B 表中要更新到 A 表的字段。
博客
记录内值排序
12-26 739
需求是把源表中每行数据中的数据排序，重新填到改行中。A3：根据 A2 每条记录转换成数组重排，再填回去。A1: 连接数据库。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值