化探异常编号与异常评价自动化方法.pdf

《化探异常编号与异常评价自动化方法.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、第38卷第2期物探与化探Vo1．38．No．22014年4月GEOPHYSICAL&GEOCHEMICALEXPLORATIONApr．，2014化探异常编号与异常评价自动化方法张茂忠，杨乐超，陈琦伟，杨振鸿(重庆市地质矿产勘查开发局JiJ东南地质大队。重庆400038)摘要：异常编号与异常评价分级是化探_T作量较大和专业性较强的作，采用VisualBasic程序方法实现了异常编号与异常评价的全自动化，快速，准确，灵活，lh内可完成3600km的1：5万化探数据处理该方法先统计出不同地质单元的背景值，在程序运行时依据]：作比例尺选择合适的搜索半径、点控制面积等参数。

2、程序利用异常临时存储器搜寻每一个元素独立的异常，自动对异常进行编号并统计异常参数，再进一步找tt；各个组合异常。该方法输出结果有2O多项，如各元素各个异常的首坐标、最大异常值、异常平均值、变异系数、富集系数、叠加强度、异常面积、组合异常的元素序列、异常重合度、综合异常评价分级指数等等。输出结果提供了较全面的异常信息，可灵活选择和创建新的异常评价分级指数关键词：地球化学；异常编号：异常评价：数据管理中图分类号：P632文献标识码：A文章编号：1000—8918(2014)02—0396—06异常评价分级是化探T作的技术关键．主要依区的大面积外带异常和避免压制低背景区的

3、低缓异赖对各个异常参数的统计，而要把各个异常分离出常的目的。对低缓异常优劣评价需结合异常图面上来进行编号，进行各种统计却不是那么容易。当的综合分析，如对异常分带模式和异常重合度等进T作面积较大、地质情况较复杂时其工作量很大．手行分析。工处理不花上几个月时间是难以完成的。笔者提出该异常评价自动化方法只完成化探异常评序T了VisualBasic_J程序方法实现异常编号与异常评作，对异常的甲、乙、丙级别编号则根据异常评序结价分级的全自动化，快速、准确而灵活。果结合地质因素手工完成，这部分工作量不大，也在本文的叙述范围内。l异常编号与异常评价方法简述2异常编号与异常评价的V

4、B程序方法异常编号是对各个元素的所有单异常和组合异常编号，均按图面从-ILN南、从西到东的自然顺序编采用VB程序来实现异常编号和异常评价分级号。可能不是最好的选择，但VisualBasic仍然能很好地异常评价根据相关技术要求的原则进行了一些解决这个问题。改进，避免了过去对单元素异常参数的一些重复评2．1程序设计要点序。笔者采用了以组合异常(或综合异常)为对象本程序为自编地球化学数据处理系统的一个过的评价方法．在一个组合异常的各元素异常平均值、程，做成了一个Command控件。数据文件选择和变变异系数、异常衬度、异常面积、异常规模、叠加强量选择等采用了通用模块方法，多

5、数据源和输出结度、富集系数、异常元素组合、异常重合度等异常参果均为Excel表，数据控件绑定。程序设置了多个数中选择一些相对独立的参数构建异常评价指数，二维数组。源数据均调入数组运行，程序运行过程只根据各个组合异常的综合评价指数对各个组合异常在输入和输出时与外部数据表连接。程序设计采用评序。了空间换时间的方案，内存数组运行占用了一些计在异常评价中，矿床地球化学异常模式是重要算机内存，却大大提高了运行速度。参考因素，异常分带结构好的低缓异常，预示着深部本方法异常编号不是在图面上进行，而是采用存在矿体的可能性，因此不能忽视低缓异常。本方了离散数据点移动方法．对含有坐标的

6、原始数据表法融入了多单元背景处理技术．达到了消除高背景搜索完成。由于有相同的坐标数据为纽带，本方法收稿日期：2013-11—152期张茂忠等：化探异常编号与异常评价自动化方法搜索的异常形态与Mapgis成图的异常相似。序是程序设计的目标。由于采用什么指标评价异常循环与控制是程序的主体单异常搜索采用了或因人因地而异，因此程序设计的各种异常评价指多重循环，最外层对变量循环，采用了For⋯Next方标仅供参考，但提供了尽可能多的基础异常参数，给法，内循环有两个D0⋯Loop套合，最内层的Do⋯创建不同的评价指标提供方便。Loop中还设置了一个对采样点的搜索循环For⋯提供

7、灵活创建异常评价指标的输出结果是必要Next。正如异常搜索示意图看到的，对采样点搜索的。从实际情况看，化探报告中异常评序方法或因的For⋯Next循环不能确定是否完成对一个单异常个人观点、因找矿目标、因不同地区或因技术发展等的搜索，必须在Do⋯Loop循环控制下反复搜索而判而各式各样。输出结果应包含更多形式的基础异常断退出。对一个元素全部异常的搜索由外层的Do参数，以满足不同的需求。⋯Loop循环控制完成。组合异常搜索采用两个Do2．2VB程序框图及输入选项⋯Loop循环控制和多个For⋯Next循环来完成VB程序实现异常编号和异常评价的方法如图异常编号和异常参