Найти точку пересечения на графике (zedgraph)

@zanzara · Регистрация: 19.10.2014

Студворк — интернет-сервис помощи студентам

Имеется одна функция h(t) и прямая X=-0,5. Как найти точку пересечения функции с прямой программным кодом? Функцию могу написать

@tarasalk · 20.10.2014, 15:07

Подставляете X=-0,5 в функцию, получаете Y. И вот ваша точка пересечения (X, Y).

@zanzara · 20.10.2014, 15:14 **[ТС]**

не думаю, что выйдет так. Вот моя программа

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Linq;
using System.Windows.Forms;
 
using ZedGraph;
 
namespace SimpleSignal
{
    public partial class Form1 : Form
    {
 
        public Form1()
        {
            InitializeComponent();
        }
 
        private double f(double x)
        {
            double k = Convert.ToDouble(textBox1.Text);
            double r1 = Convert.ToDouble(textBox2.Text);
            double r2 = Convert.ToDouble(textBox3.Text);
            double r3 = Convert.ToDouble(textBox4.Text);
            double c = Convert.ToDouble(textBox5.Text);
            double t = Convert.ToDouble(textBox6.Text);
            double lm1, lm2;
            string pr1 = "";
            string pr2 = "";
            string pr3 = "";
            r1 *= 100;
            r2 *= 100;
            r3 *= 100;
            c *= 0.00001;
            lm1 = -(1 / t);
            lm2 = -((r2 + r1) / (r1 * r2 * c));
            label8.Text = Convert.ToString(lm1);
            label9.Text = Convert.ToString(lm2);
            if (lm2*Math.Exp(lm1*x)<0) pr2="-";
            else pr2="";
            if ((lm1 - lm1) < 0) pr3 = "+";
            else pr3 = "";
            label1.Text = string.Format("{0}{1:0.####}* ({2:0.####}*e^({3:0.####}t) {4} ({5:0.####}*e^({6:0.####}t{7})) {8:0.####})", pr1, ((k * r3) / ((lm2 - lm1) * (r1 + r2))), lm1, lm1, pr2, lm2, lm2, pr3, (lm2 - lm1));
 
            return -((k * r3) / ((lm2 - lm1) * (r1 + r2))) * (lm1 * Math.Exp(lm2 * x) - lm2 * Math.Exp(lm1 * x) + (lm2 - lm1));
        }
 
        private void DrawGraph()
        {
            GraphPane pane = zedGraph.GraphPane;
 
            pane.CurveList.Clear();
            pane.Title.Text = "График";
            pane.XAxis.Title.Text = "t";
            pane.YAxis.Title.Text = "h";
            pane.XAxis.MajorGrid.IsZeroLine = true;
 
            PointPairList list = new PointPairList();
            double xmin = 0;
            double xmax = 6;
            for (double x = xmin; x <= xmax; x += 0.01)
            {
                list.Add(x, f(x));
            }
 
            LineItem myCurve = pane.AddCurve("h(t)", list, Color.Blue, SymbolType.None);
 
            zedGraph.AxisChange();
            zedGraph.Invalidate();
 
 
        }
 
        private void lin1()
        {
            PointPairList list = new PointPairList ();
            GraphPane pane = zedGraph.GraphPane;
            double xmin = 0;
            double xmax = 6;
 
            for (double x = xmin; x <= xmax; x += 0.1)
            {
                list.Add(x, 0.5);
            }
 
            LineItem myCurve2 = pane.AddCurve("he", list, Color.Red, SymbolType.None);
            zedGraph.AxisChange();
            zedGraph.Invalidate();
            myCurve2.Line.IsSmooth = true;
        }
 
        private void lin2()
        {
            PointPairList list = new PointPairList();
            GraphPane pane = zedGraph.GraphPane;
            double xmin = 0;
            double xmax = 6;
 
            for (double x = xmin; x <= xmax; x += 0.1)
            {
                list.Add(x, -0.5);
            }
 
            LineItem myCurve = pane.AddCurve("he", list, Color.Red, SymbolType.None);
            zedGraph.AxisChange();
            zedGraph.Invalidate();
            myCurve.Line.IsSmooth = true;
        }
        private void Form1_Load(object sender, EventArgs e)
        {
 
        }
 
        private void button1_Click(object sender, EventArgs e)
        {
            DrawGraph();
            lin1();
            lin2();
        }
    }
}

@tarasalk · 20.10.2014, 15:35

Сообщение от zanzara

не думаю, что выйдет так

Еще как выйдет. Вы же как то строите график? и наверняка строите его по точкам, подставляя одно значение, и получая другое.
Вот я вижу на 66 строчке

C#
1
list.Add(x, f(x))

Примерно так должно сработать

C#
1
2
double x=-0.5;
double y=f(x);

Вот если вдруг там будет несколько точек пересечения, то да, тут уже посложнее.

@zanzara · 20.10.2014, 15:37 **[ТС]**

не могу понять куда вставить эти строчки, чтобы не "сломать" всю программу)
Точек пересечения одна)

Новые блоги и статьи Все статьи Все блоги /
1С: Контроль уникальности заводского номера Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .

@zanzara 0 / 0 / 0 Регистрация: 19.10.2014 Сообщений: 14

	Найти точку пересечения на графике (zedgraph) 20.10.2014, 14:53. Показов 2189. Ответов 4 Метки нет (Все метки) Имеется одна функция h(t) и прямая X=-0,5. Как найти точку пересечения функции с прямой программным кодом? Функцию могу написать 0

@tarasalk 1992 / 1216 / 440 Регистрация: 13.06.2013 Сообщений: 4,115
	20.10.2014, 15:07
	Подставляете X=-0,5 в функцию, получаете Y. И вот ваша точка пересечения (X, Y). 0

@zanzara 0 / 0 / 0 Регистрация: 19.10.2014 Сообщений: 14
	20.10.2014, 15:37 [ТС]
	не могу понять куда вставить эти строчки, чтобы не "сломать" всю программу) Точек пересечения одна) 0