All Forums  Origin Forum for Programming  Forum for Origin C  access column in loop

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

Screensize: 640 x 480 800 x 600 1024 x 768 1280 x 1024 UserName: Password: Anti-Spam Code: Format Mode: Basic  Help  Prompt  Format: Font Andale Mono Arial Arial Black Book Antiqua Century Gothic Comic Sans MS Courier New Georgia Impact Lucida Console Script MT Bold Stencil Tahoma Times New Roman Trebuchet MS Verdana   Size 1 2 3 4 5 6   Color Black Red Yellow Pink Green Orange Purple Blue Beige Brown Teal Navy Maroon LimeGreen Message: * HTML is OFF * Forum Code is ON Smilies [quote][i]Originally posted by DB-L[/i] [br]Origin Ver. and Service Release (Select Help-->About Origin): Operating System: XP, origin 9.1 Hello, I new on origin and I am blocked in C++ code. I wan't to extract root from a polynomial. I wrote a bisection method which run good. But now, I want to input the values of two column in my worksheet and output the root in an other column. Here is the code. If someone could help me, it will be very kind... double function (double x, double K, double P, double z, double y) { return K * P * (y - x )* pow((1 - (z * x) ),z) - ( z * x) } void dichotomie() { double leftpt, rightpt, midpt, epsilon = .00000000001; double midvalue, rtvalue, root; Worksheet wks = Project.ActiveLayer(); double K = wks.Cell(0, 4); double P = wks.Cell(0, 3); // this value should be in a column double z = wks.Cell(0, 5); double y = wks.Cell(0, 0); leftpt = 0.0, rightpt = 0.4; do { midpt = (leftpt + rightpt) / 2.0; rtvalue = function(rightpt, K,P , z, y); midvalue = function(midpt, K, P, z, y); if (rtvalue * midvalue >= 0) rightpt = midpt; else leftpt = midpt; } while ((rightpt - leftpt) > epsilon); root = (rightpt + leftpt) / 2.0; wks.SetCell(0, 8, root); // the value should be different at each row return; } [/quote]   Check here to include your profile signature. Check here to subscribe to this topic.