• 大小: 932KB
    文件类型: .rar
    金币: 1
    下载: 0 次
    发布日期: 2021-05-23
  • 语言: 其他
  • 标签: P3曲线  

资源简介

包含水文学中的p3曲线代码及数据,适合新手看和学,内容不多,一般都能看懂,很简单

资源截图

代码片段和文件信息

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace PEIXIAN
{
    class Calculate
    {
        public Calculate() { }

        public static P3Data Fill()
        {
            int recCnt = Form1.P3Data.RowCount;
            GetPaixu();
            object[] vals = getColVal(3);
            double d_sum = vals.Sum(n => Convert.ToDouble(n));
            double d_exp = d_sum / recCnt;
            int d_sta = vals.Min(n => ((int)Convert.ToDouble(n) / 100) * 100);
            int d_end = vals.Max(n => ((int)Convert.ToDouble(n) / 100 + 1) * 100);

            //p = m/(n+1)
            double d_p = 1.0 / (recCnt + 1);
            for (int i = 0; i < recCnt; i++)
            {
                Form1.P3Data[8 i].Value = Math.Round((i + 1) * d_p 4);
            }
            //mobi
            for (int i = 0; i < recCnt; i++)
            {
                Form1.P3Data[4 i].Value = Math.Round(Convert.ToDouble(Form1.P3Data[3 i].Value) / d_exp 4);
            }
            //K-1
            for (int i = 0; i < recCnt; i++)
            {
                Form1.P3Data[5 i].Value = Math.Round(Convert.ToDouble(Form1.P3Data[4 i].Value) - 1 4);
            }
            //K-1 ^2
            for (int i = 0; i < recCnt; i++)
            {
                Form1.P3Data[6 i].Value = Math.Round(Math.Pow(Convert.ToDouble(Form1.P3Data[5 i].Value) 2) 4);
            }
            double dsum = getColVal(6).Sum(n => Convert.ToDouble(n));
            double d_Cv = Math.Sqrt(dsum / (recCnt - 1));

            //k-1 ^3
            for (int i = 0; i < recCnt; i++)
            {
                Form1.P3Data[7 i].Value = Math.Round(Math.Pow(Convert.ToDouble(Form1.P3Data[5 i].Value) 3) 4);
            }
            double d_Cs = getColVal(7).Sum(n => Convert.ToDouble(n)) / (Math.Pow(d_Cv 3) * (recCnt - 3));
            P3Data P3Data = new P3Data();
            P3Data.d_Cs = d_Cs;
            P3Data.d_Cv = d_Cv;
            P3Data.d_Exp = d_exp;
            P3Data.d_Start = d_sta;
            P3Data.d_End = d_end;
            return P3Data;
        }
        public static void GetPaixu()
        {
            int recCnt = Form1.P3Data.RowCount;
            double[] d_Vals = new double[recCnt];
            for (int i = 0; i < recCnt; i++)
            {
                d_Vals[i] = Convert.ToDouble(Form1.P3Data[2 i].Value);
            }
            //var items = d_Vals.OrderByDescending(delegate(double d) { return d; });
            var items = d_Vals.OrderByDescending(n => n);
            //var items = from d in d_Vals
            //                    orderby d
            //                    select d;
            int index = 0;
            foreach (var item in items)
            {
                Form1.P3Data[3 index].Value = item;
                ++index;
            }
        }
        //配线 1-99fanhuiKp
        public static double[] Pe

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

    .CA....   1276720  2011-01-18 18:27  201001007刘赛(源程序)\PEIXIAN\bin\Debug\Microsoft.Office.Interop.Excel.dll

    .CA....   1124349  2011-01-18 21:08  201001007刘赛(源程序)\PEIXIAN\bin\Debug\Microsoft.Office.Interop.Excel.xml

    .CA....     64288  2011-01-18 18:27  201001007刘赛(源程序)\PEIXIAN\bin\Debug\Microsoft.Vbe.Interop.dll

    .CA....    416544  2011-01-18 18:27  201001007刘赛(源程序)\PEIXIAN\bin\Debug\office.dll

    .CA....    647452  2011-01-18 21:08  201001007刘赛(源程序)\PEIXIAN\bin\Debug\office.xml

    .CA....    352768  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\bin\Debug\PEIXIAN.exe

    .CA....    122368  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\bin\Debug\PEIXIAN.pdb

    .CA....     11600  2014-05-21 09:23  201001007刘赛(源程序)\PEIXIAN\bin\Debug\PEIXIAN.vshost.exe

    .CA....       490  2010-03-17 22:39  201001007刘赛(源程序)\PEIXIAN\bin\Debug\PEIXIAN.vshost.exe.manifest

    .CA....      4115  2013-06-02 16:21  201001007刘赛(源程序)\PEIXIAN\Calculate.cs

    .CA....      2357  2013-06-02 16:21  201001007刘赛(源程序)\PEIXIAN\CalculateMath.cs

    .CA....      9510  2013-06-02 18:17  201001007刘赛(源程序)\PEIXIAN\ConDrawP3.cs

    .CA....      2144  2013-06-02 16:21  201001007刘赛(源程序)\PEIXIAN\ConDrawP3.Designer.cs

    .CA....      5817  2013-06-02 16:21  201001007刘赛(源程序)\PEIXIAN\ConDrawP3.resx

    .CA....      3361  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\Form1.cs

    .CA....      9490  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\Form1.Designer.cs

    .CA....    250763  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\Form1.resx

    .CA....     34996  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\DesignTimeResolveAssemblyReferences.cache

    .CA....      6791  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\DesignTimeResolveAssemblyReferencesInput.cache

    .CA....      5402  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\GenerateResource.read.1.tlog

    .CA....      9622  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\GenerateResource.write.1.tlog

    .CA....       180  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.ConDrawP3.resources

    .CA....     12276  2014-05-21 09:23  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.csproj.FileListAbsolute.txt

    .CA....    352768  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.exe

    .CA....    162428  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.Form1.resources

    .CA....    162428  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.P3Chart.resources

    .CA....    122368  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.pdb

    .CA....       180  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\PEIXIAN.Properties.Resources.resources

    .CA....     28774  2014-05-21 09:07  201001007刘赛(源程序)\PEIXIAN\obj\x86\Debug\ResolveAssemblyReference.cache

    .CA....      3463  2013-06-02 18:27  201001007刘赛(源程序)\PEIXIAN\P3Chart.cs

............此处省略25个文件信息

评论

共有 条评论

相关资源