Linear grafiğin parabolik hesabı vba nasıl?

Katılım
24 Nisan 2005
Mesajlar
3,680
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
Mavi Grafik
1. Noktanın değeri 4
9. noktanın değeri 10

Kırmızı Grafik
1. Noktanın değeri 4
9. noktanın değeri 10


* Mavi grafiği iki nokta arası farkları alıp bölüp her adımda çıkan sonuç ile kendisini toplayıp buluyorum
Bu linear bir sonuç çıkarıyor.

* Kırmızı grafiği yada benzerini oluşturmak için vba da nasıl bir hesaplama yapmak gerekir. Matematik ten pek anlamıyorum. Tanjant diye birşey ile yapılıyormuş :)

https://i.hizliresim.com/z0Q67g.jpg

 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,398
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Asri Bey;

Önerim olduğundan değil de merak ettiğim için soruyorum ...

Siz bu işi "Chart" nesnesi üzerinde mi yapmak istiyorsunuz, yoksa sayfa üzerinde mi?

.
 
Katılım
24 Nisan 2005
Mesajlar
3,680
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
Asri Bey;

Önerim olduğundan değil de merak ettiğim için soruyorum ...

Siz bu işi "Chart" nesnesi üzerinde mi yapmak istiyorsunuz, yoksa sayfa üzerinde mi?

.
Bana hesaplama yöntemi ve oluşacak veriler lazım.
Grafik semboliktir. Grafik oluşturulmayacak.
 

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
.

Asri bey merhaba.

Sorunuzu tam olarak anlamış değilim.Ancak, Grafikten anladığım kadarı ile söylüyorum.

Bir parabol var. Bunun tepe noktasında kesişen iki doğru var. Kesişen bu iki doğru aynı zamanda parabol kollarının x ve y eksenlerini kestiği noktalardan geçiyorlar.

1. y=ax^2+bx+c şeklinde bir fonksiyonunu olması gerekir.

2. Bu fonksiyonun tepe noktası'nın x ve y noktaları bu fonksiyonun türevini 0'a eşitleyip, x1 ve y1 ve noktaları bulunur. Veya x=-b/2*a ve bu buluktan sonra fonksiyonda yerine konular y bulunur.

3. Fonksiyonda y'ye 0 değer verilerek denklem çözüldüğünde parabolun x eksenini kestiği noktalar, x' e 0 verilerek y eksenini kestiği noktalar bulunur.

Elimizde üç nokta var:

Tepe(x1;y1) bu hem parabolun ve hem de iki doğrunun kesiştiği yer.

Y eksenini kestiği nokta (0;y2)
X eksenini kestiği nolta (x2;0)

Şimdi soru ne? Üç noktasının koordinatları verilen parabolun ve kesişen doğruların denklemlerini mi elde etmek mi istiyoruz?
Üçgenin alanı mı? Diğer alanlar mı?

Eğer sorunuzun başlığına bakarsak, kesişen bu iki doğruyu baz alarak üç noktası belirli olan bir parabolun denklemini elde etmek gibi geliyor bana.


.
 
Katılım
24 Nisan 2005
Mesajlar
3,680
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
İdris bey,

bilgilendirme için teşekkür ederim.

Kesişen iki doğruyu oluşturan değerleri elde edebiliyorum. Ancak bu değerler lineer artıyor. Bana bu üç noktanın parabol ünü oluşturan verileri hesaplama yöntemi lazım. Mavi çizgileri parabol ün üç noktasını belirtmek amacı ile çizdim.

..Eğer sorunuzun başlığına bakarsak, kesişen bu iki doğruyu baz alarak üç noktası belirli olan bir parabolun denklemini elde etmek gibi geliyor bana.
Evet tespitiniz doğrudur.

Asri bey merhaba.

Sorunuzu tam olarak anlamış değilim.
Aslında problem benim değil bir arkadaşımın problemi, ben de tam anlatamamış olabilirim :)
Son tespitiniz durumu özetliyor.
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,398
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Asri Bey;

Verdiğiniz datalara göre çizilen parabol ekli dosyadadır. Ama, denklem yok ... :biggrin:


.
 

Ekli dosyalar

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,398
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Asri Bey;

Yukarıda İdris Beyin belirttiği y=Ax² + Bx + C şeklinde olduğu kabul edilen denklemdeki A, B ve C katsayılarının belirlenmesi sonucunda elde edilen denklem ve ilgili dataları ekli dosyada belirtilmiştir.

İdris bey belki daha başka bir çözüm getirebilir, onu da beklemek yararlı olacaktır.

Selamlar,

.
 

Ekli dosyalar

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,398
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Yukarıdaki dosyaya, hesaplanan katsayılardan sonra elde edilen 2. dereceden fonksiyonun grafiğini çizdim ama beklediğimiz grafik çıkmadı.

Belki de; söz konusu denklem bizim varsaydığımız formatta 2. dereceden değil, 3. veya 4 - 5. dereceden polinom olabilir. Belki de logaritmik bir fonksiyon veya başka bir tipte fonksiyon olabilir.

Dolayısı ile; fonksiyonun polinom olup olmadığı ve eğer polinom ise, kaçıncı dereceden olduğu bilinmelidir.
.
 

Ekli dosyalar

Son düzenleme:
Katılım
24 Nisan 2005
Mesajlar
3,680
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
@Haluk ve @İdris,

bilgilendirmeler ve örnekler için teşekkür ederim.
Konun başında da belirttiğim gibi matematik olaylarından çok uzağım, meslek lisesi ve MYO da türev, integral trigonometri hiç görmedim yada şeklini görecek kadar gördük. Sadece iç açılar toplamı 180 kısmını biliyorum. Eğer yanlış hatırlamıyorsam. Bilmemek ayıp değil, öğrenmeye de ihtiyacım olmadı :)

Excel fonsiyonları ile yaptığınız çözümler benim işimi yaramayacak.

Ekli dosyada linear verilerini oluşturma ile ilgil yazdığım kod mevcut.

Bu veri tablosunun VBA prabolik şekline dönüşmesi için bir çözüm arıyorum.
 

Ekli dosyalar

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,849
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Merhaba Arkadaşlar,
Soruyu bu sabah gördüm. Bu sola bakan bir parabol. O nedenle de denklemi x=ay2+by+c şeklinde olmalıdır. Resimlerde çözümü anlattım. Doğru noktalar belirtilirse net denklem de elde edilebilir.
Saygılarımla
 

Ekli dosyalar

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,398
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Merhaba Tevfik Bey;

Ben de tam, forumda o kadar çok öğretmen var acaba aralarında matematik öğretmeni yok mu diye düşünürken sizin cevabınızı gördüm.

Tahmin ettiğim gibi, İdris beyle düşündüğümüz kalıp yanlıştı.

Sizin; "Sola bakan parabol" tanımınız ve polinom kalıbınız işi çözdü.

Buna göre ilgili parabol fonksiyonunu çözdüm ve grafiği çizdim. Sonuçta; Asri Beyin 1. mesajında istemiş olduğu grafik çıktı.

İşin güzel tarafı, bu grafik; yukarıda 6 No'lu mesajımın ve bu mesajımın ekindeki dosyaların birinci sayfalarında herhangi bir hesap yapmadan elde edilen grafik ile aynı çıktı.

Çözüm ve grafik ekli dosyadadır.

Not:
İkimizin denklem çözümündeki fark ise; grafiğin okunmasından kaynaklanıyor.
Ben, Asri beyin birinci mesajında vermiş olduğu grafikteki verilerden ve kendisinin mesajlarından anladığım kadarıyla;

x= 4 ---- y=1
x= 9 ---- y=10
x= 1 ---- y=20

olarak kabul ederek, 3 bilinmeyenli 3 denklem çözdüm.

..
 

Ekli dosyalar

Son düzenleme:

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
.

Herkese merhabalar.

Ben de bir çözüm üretmiştim.

Haluk bey bizim düşünüş yolumuz doğru. Excel de öyle düşünüyor. y eksenine bakan parabollere reverse paraboller denir. Doğal olarak hem biz ve hem de Excel sağ elini kullanmaya alışmışken sol elinizi kullanın denmiş.

Her neyse. Artık işin makroya dökümü sayın asri' ye kaldı.

.

.
 

Ekli dosyalar

Katılım
24 Nisan 2005
Mesajlar
3,680
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
Arkadaşlar, tüm destekler için teşekkür ederim.

Son açıklamalardan sonra ben bile bir şeyler anladım. :)
Bundan sonrası bende :)
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,398
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Idris Bey, sizin cozum de cok kaliteli olmus :)
 

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,849
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
İşe yaradı ise ne mutlu
Hepimize
iyi çalışmalar
 
Üst