Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

How to automate the LINEST function in vba to find the best fit for a second order or higher polynomial?

Posted on 2009-04-08
6
Medium Priority
?
1,308 Views
Last Modified: 2012-08-13
I have hundreds of data sets showing change (y) over time (t) at different locations.  I am attempting to plot the (y,t) data for each location and fit a second order polynomial line of regression to each of the data sets.  I would like to automate the LINEST function in VBA to accomplish this by finding the constants C1, C2, and b; i.e. y = C1*t^2 + C2*t + b.  I would also like the statistical data that LINEST provides.

Thanks, BL
0
Comment
Question by:brandonlampe
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
6 Comments
 
LVL 25

Expert Comment

by:InteractiveMind
ID: 24102106
Are you familiar with matrices?

Compose the Vandermonde matrix for the t_i data, that is:

      [ 1  t_1  t_1^2 ]
      [ 1  t_2  t_2^2 ]
X = [   .       .        .  ]
      [   .          .     .  ]
      [ 1  t_n  t_n^2 ]

Then compute:

  (X^t X)^-1 X

and multiply this (from the left of course) by:

      [ y_1 ]
Y = [   .    ]
      [ y_n ]

then the answer will be a vector consisting of the coefficients:

  [  b  ]
  [ C2 ]
  [ C1 ]

0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 24105766
The trendline formulas are here if it helps: http://spreadsheetpage.com/index.php/tip/chart_trendline_formulas/
 
0
 

Author Comment

by:brandonlampe
ID: 24112709
I guess I was looking for a little more help with writing the VBA code.
0
 
LVL 3

Expert Comment

by:jtm111
ID: 24205677
brandonlampe -- I hope you still need help on this because I know the answer.

You have to install the Analysis Toolpak - VBA add-in, which I assume you know how to do since you're a VBA programmer.

Make sure you choose both the Analysis Toolpak AND the Analysis Toolpak - VBA

The resource for the Analysis Toolpak - VBA is something like

C:\Program Files\Microsoft Office\Office12\LIBRARY\ANALYSIS\ATPVBAEN.XLAM

Then, when you're in the VBA editor in Excel, you can call the data analysis functions. The native LINEST is actually surpassed by the Regress function which gives all the output you want.

One the Analysis Toolpak add-ins are installed correctly, go to your VBA editor and add a Reference to ATPVBAEN.XLS

Here's a little snippet:

Sub test()
    Dim Res As Variant
    Res = [atpvbaen.xls].Regress( ARGS = X AND Y RANGE,  DESIRED OUTPUT STATISTICS )
    Debug.Print Res
End Sub

What you want to do is totally possible.

Good luck, hope this helps!

 
0
 

Accepted Solution

by:
ee_auto earned 0 total points
ID: 25847814
Question PAQ'd, 250 points not refunded, and stored in the solution database.
0

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article describes how to use a set of graphical playing cards to create a Draw Poker game in Excel or VB6.
If you need to forecast numbers -- typically for finance -- the Windows and Mac versions of Excel 2016 have a basket of tools to get the job done.
Graphs within dashboards are meant to be dynamic, representing data from a period of time that will change each time the dashboard is updated with new data. Rather than update each graph to point to a different set within a static set of data, t…
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

618 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question