You are welcome, but I'd be pretty sure a true grtl wizard will pop by shortly o hlp you out I atill think the be way o hnl our problem i by using a volumn vector ond let the program do the "bubble Sort" looping work fingers crossed for you Seems to me rom ht ou write that you r mkin things oo hard for yourselfl WHy Sum things ? Set up 2 vectors of size to hold all the numbers say A[4] nd B[4] iNitialize B[i]=0 THen loop for i =1 to 4 If a[i].> b[i] then b[i]= a[i] b[i] will hold your result all sorted for you if you get me ?
Richard Hudson Kind Regards > Thanks Hello, > > I actually just forgot the "." for the element-wise iteration over A. > The solution is given by summing up the resulting C which gives the > position A[i] for which B>=A[i]. If the sum(C)+1 is greater cols(A), B > is never greater than any A[i]: > > <hansl> > A = seq(4,1) > matrix B = 3 > C = (B.>=A)?0:1 > matrix pos = 0 > pos = sum(C)+1 > pos > pos<\hansl> > > > @ Richard: This is my first idea, but I was looking for a simpler way > avoiding any use of loops here. > > Artur > > > Am 21.11.2013 12:58, schrieb Dr RJF Hudson: >> Hi there, >> this is an ordinary if then or else loop in Fortran and Basic, but >> instead >> of storing the found result in "C" >> I'suggest creating a (4x1) matrix columm vector and store the "found >> values >> in the column vector at each "i" location >> and I suspect it is the same in Gretl but I confess to being a novice at >> Gretl sorry to say right now >> Best wishes to all, >> Hope these few commnts are of small help >> Good luck >> Richard Hudson >> >> >> >> >> Dr RJF Hudson >> ----- Original Message ----- >> From: "Artur T." <artur.tarassow(a)googlemail.com> >> To: "Gretl list" <gretl-users(a)lists.wfu.edu> >> Sent: Thursday, November 21, 2013 9:05 PM >> Subject: [Gretl-users] small practical issue >> >> >>> Hi gretl users, >>> >>> I am looking for a simple way to determine the column for which scalar B >>> is, let's say, larger or equal to the entry A[i] and store this >>> information in scalar C. If B is never greater than any entry in A[i], C >>> is zero. >>> Reading out each entry via a loop is possible, but I am wondering >>> whether there is a short-cut to this. >>> >>> C = 0 >>> A = seq(4,1) >>> B = 3 >>> # check at which entry A[i] the value of B >= A[i] >>> >>> Maybe somebody a nice suggestion :-) >>> >>> Artur >>> >>> _______________________________________________ >>> Gretl-users mailing list >>> Gretl-users(a)lists.wfu.edu >>> http://lists.wfu.edu/mailman/listinfo/gretl-users >> >> _______________________________________________ >> Gretl-users mailing list >> Gretl-users(a)lists.wfu.edu >> http://lists.wfu.edu/mailman/listinfo/gretl-users >> > > -- > For global instant messaging use the free and transparent Jabber chat: > t.artur(a)cryptolab.net > Avoid Facebook and join me on Diaspora: https://despora.de/i/9fba3608d45a > > If you want to use encrypted emailing, here is my public PGP key: > > -----BEGIN PGP PUBLIC KEY BLOCK----- > Version: GnuPG v1.4.12 (GNU/Linux) > > mQINBFIFGVsBEACc0QWXQ8fijGzIvQUWQTTYE/0O/qKQRRjNX7O3UwkASTOZM12H > aZ3YzpqZOvfFnK/BMUCtOYfkoZJJwoLwPDio+wlmQ1DCDjNVYJhkxbjThs+pBdk0 > YdyZ3b+bwylb8StnexA0EOSpdV8tOpWo3JVw2WXAs9y9MxierKHIr3aAsHNyGI4V > j+46Cz9mmfyQBJAA7tlK7Th1pibb18ww0fxFnAOmBNBvexCTb+z353FtgDdIc/Wq > LFLmdtP73Ntui6DYviGT+YvV2FBYFxF6x8TGwnYnnvQ88VGl+aflyVjp+LRUnbo0 > pOD5LTAA6f6b5ZSZq8GzufLDrZxMRL1qS/+8lp8AAI0/x7y7GtRdznB4KYOAKd1Z > a/GgcuMl9N6T7B+azwxQa1th+ucMdSZO4PMOHjhsp0xYJftgEOG44GHJPqchS5Zd > nKphboRVJjV9KA/uLUV/S6n8Qhh6tRBLiQ2RPMSGjKTdKObMxJ9YbDirHChSgi5x > 77iGf+3F413s6XCbazLYv+03lylFCBT3p9mYDWIMqJS2jCzWVjXbea6iu5ZMN5Ji > ESNiTHjN1pW97c+HaLxzo9/PobUceHYVzwKvEfBH4wVIzCExMlKRI0xwIp6ACk3E > XJPKsp8+a9HMp1qdCvi0zye/Th7FhIOPhVYlRgCf157O18MxLj4dJu2XewARAQAB > tCBBcnR1ciBULiA8dC5hcnR1ckBjcnlwdG9sYWIubmV0PokCPgQTAQIAKAUCUgUZ > WwIbIwUJA8JnAAYLCQgHAwIGFQgCCQoLBBYCAwECHgECF4AACgkQlEChRi+nhULG > FQ/9Fcz/aI7fcKOd9NG1Wb0ziyKHihg5uoEMFsOTFGDboC+EddrQwkGdkOpWhQzN > vnPCji+WuWHliG6DiRYViG+HYN+yBhaFB6ASe+jJYCXaoxI1u7e3UOscwOmg6zb7 > TdR27jI0mguu0ZT1bFLWh7hDzqAa33ANWwX++J8ncc08SMw3/cJoddzUrkc1PcUY > M+mB2AgURVCC+TCzpsEuZ7jqTJAH3+aLUnxGMWm3hTlt2eirYieon+a9PlRqlTZD > 0wOyd6z5mU+uUQr4lqfHNl9XOH/vP9oqDNW6uCItdGTmKtOVioE0BA+7p06tnobv > iUxNCc8dz81x+ZLoxjS2H6zCTf00PVf8ZdBWtxM0S0/9sRkuyTE1exwZOpob552m > HbQIIRIgB3+PwyM2mXgRSWXciITyH6LOvJoPDTp+vrHqUtUCX3LoIRP6ySqo7rEi > /UnF2WAwjjEPIVByvfS9ZVXQaL5ASHUV06yMAmMp7h6GfLgo4JNOr6wxl+sYgNwy > UimKVGx2OdAQoUPGN2VQA9SPxFtbDPTsH472s4FoEVGhq2OBSMdAVeKJgDDkrsQm > u5lk0+Or2GewwjxoBu77kRgihkqBX2ND6Z2pHs95g1nngrqM6sg895fp5Lo+MHAJ > +8cSUxs0diDA7ybG1j8KTx5Vx6yPLcmgj9MlHVaNiMnAKuC5Ag0EUgUZWwEQANDG > ZbQoate2ul8zMDwlr+DmlzSJBUMue4ABFXW0dJSZ+E8awJkYRL3jcjJqVVOrk9cT > gqy0Rum16SGswYrFa4xEE/gb8h97A/ZuJ9wOSe/Os5hySI+62cZSJrd+2AYI8rY7 > 3iW/QlaO38mFcsulSMg7+SqZjHpFI3tfMj+5e3vx1FsYazAR/jI4U02gP6OdHj5h > 6oAS7OqlCSvN0j0LatTuc7LvfjLkSWCWyZUfe2pujUCc1gZ95wINzSamYcxfd+o4 > MjOizFULw5zmuioiHWlp35nGLu03uOaBJgR85dTvyQqa4aQXLCfwvSICBEl6aAZp > ODtfZUOpT/sQdqIpGrc4rytz763BpnuVl92RzNoQtjsLE8wnJRzElFjYeOI4JZLL > RhEa0iNVpbFvv4rmOqVafxL0dR8wkCjiPMgWii/qm6crpsOnhOJ3Wov8EGVL53hI > 0OOGxkQ0YV9PF8L45vcvK8TMSm+V19l53yQYOvxPECcCksn9uFCdMNvPoef7FZLO > nXIORP4IBcMTKf2N07QFbfkZRVh5SZgUOFxMtLIqBmWQqpmEAdO7SCybJkAgwdpJ > VliEWQSxFeLwyV9kQUmN7oQsQ8jYxO1C0vTnstDjZYC4EBPf08kCPLQXI1gM3/v2 > POKDZVk6EAFQelVia8OIFyHA9mLwc9HV7b7KYwGrABEBAAGJAiUEGAECAA8FAlIF > GVsCGwwFCQPCZwAACgkQlEChRi+nhUKh5A/7B75inrTA4PMWaY6fjA4UnhFi6BBy > bY/QIpkv7zle4H6y0tbDsAziB80i0GsMqDka+LEmCr9BBmZNyD6vUeFbE0uECiE8 > XupOmw/B3+Czscuo29CqtMYpwlMX9oVXFiaWd/LHsIMOgI5BstDaE8pBga+IMyKz > HsPdSDz+MqdQwp/9pY5FfB1/h4VpFNXOIsEDjimALvwCHW9F34Nv/tFCd39Li2sd > jktLLgJKVurEHisEfws4vJRsmPtsFdgqGGHm0r/wxJYROY8ki+veZCNpYmwVWAcY > iZK7AFbqqsNMdMyKXOiMGawq9LZSnpBmgiBzKJmqAL6BNqEO4/M8E+zz8rlrjD3/ > 16iTljR+FPriXF/g0KWli1C1Fx6ntCYQUElO9Hu6X4CEA5zT7T6vXTapRkMA51PM > xepwgASu9YWRAig8qZI18X2uh0I3VdhERxgAMmDn8V1qjTn/gd0S7RPYtduUHgNW > /sCV5B6vZsmaO0fImKCJdJjVZTCViW5h9XHFSNH7hXjnr/+4SKrvfm4Du1DPiGKn > 4oD7/QUHeSpdfDKJo/E9nM39aKxgN6+RqJUd2J2Db2aNBCQwa1o+SOtrriqyCMjp > K+4gDumAFG2lg/PD/ki/aNucMROO9t/uPFQFhheaUF9R1rXJh66KyxQFsxKC00uZ > kJ87csTGWSWmWns= > =tQPP > -----END PGP PUBLIC KEY BLOCK----- > _______________________________________________ > Gretl-users mailing list > Gretl-users(a)lists.wfu.edu > http://lists.wfu.edu/mailman/listinfo/gretl-users