Re: remarks on significance arithmetic implementation [Was: Re: Numerical accuracy/precision - this is a bug or a feature?]
- To: mathgroup at smc.vnet.net
- Subject: [mg120340] Re: remarks on significance arithmetic implementation [Was: Re: Numerical accuracy/precision - this is a bug or a feature?]
- From: Richard Fateman <fateman at eecs.berkeley.edu>
- Date: Tue, 19 Jul 2011 06:58:03 -0400 (EDT)
On 7/18/2011 11:54 AM, Daniel Lichtblau wrote: > > [Caution: This may increase the entropy of the thread, and almost > certainly will increase the ennui.] Yep > > ... snip ... a bunch of things I think we agree upon. > To expand on "properly rounded floats" I will mention that > Mathematica's significance arithmetic, in certain settings, is as > conservative as interval arithmetic. Specifically this works out when > the operations used are addition, multiplication, integer powering, or > division with both operands approximate. Also required is that they > have more significant digits than can be represented by the error > recorder (that is to say, more than 16 or so digits when error is > recorded as a 53-bit-mantissa float). The gist is that precision is > altered downward in a way that will even account for second order > error (and the higher order error terms that exist in computing x/y > where x and y are both approximate bignums). I am unclear on this zeroth, first, second order error categorization. It seems to me that the critical problem, and one that is not addressed by Mathematica, in interval arithmetic, is addressing dependence of operands. Consider the two expressions f[x_]:= (x-1)*(x+1) and g[x_]:=(x^2-1) which are analytically the same function. given the value v=Interval[{-1/2,1/2}] f[v] returns an interval with width 2. g[v] returns an interval with width 1/4. The function g is obviously a lot better than f. Same thing happens for v=0.1`2. f[v] is -0.99`269.. but g[v] is -0.99`3.69... So according to Mathematica, g evaluates to a full decimal digit higher accuracy. A true devotee of interval arithmetic (or of significance arithmetic) would take the function body for f and rearrange it as g, and also would require for comparisons such concepts as possibly-equal, certainly-greater-than etc. And would need to resolve meanings for empty intervals and other such things. Some of these may in fact be in Mathematica's interval arithmetic suite. They seem to be absent in the significance arithmetic world, though there is a transition from one to the other possible. Note that Interval[0.1`2] returns the fairly nonsensical Interval[{0.1,0.10}] but InputForm[%] shows Interval[{0.098046875`1.9914337561691884, 0.101953125`2.008400542026431}], maybe overkill. Interval[{0.98,0.102}] might be OK. There are ways of reducing semi-automatically, the number of repeat occurrences of operands in such expressions, thereby improving the interval widths. This (that is, computing "single use expressions") is the kind of thing that would, I think, be useful and for which computer algebra systems are especially appropriate. That, in combination with some other tricks of interval "reliable" arithmetic would be helpful (and for which I have written some programs, not in Mathematica though). So the real contribution to interval arithmetic (or significance arithmetic) of Mathematica would be if it were able to reformulate some subset of expressions so that they were automatically computed faster and more accurately. (One could argue that boosting the software precision will get the answer accurately, especially if one ignores exponentially longer run-times.) For some discussion in the context of a (different) programming language that is not much like Mathematica, see http://developers.sun.com/sunstudio/products/archive/whitepapers/tech-interval-final.pdf There are other, more expensive techniques. E.g. if p(x) is a polynomial, what is p[Interval[{a,b}]] ? Instead of just interval-alizing the + and * and ^, find the extrema of p between a and b. What is Sin[Interval[...]], etc. > > It would not be hard to extend this to the taking of reciprocals and > hence division of integer by float e.g. x --> 1/x. But as best I can > tell from looking at the code, Mathematica does not do this, so error > tracking in that case is purely first order. Maybe I'm not following here, but computing an interval for 1/x does not seem difficult. > > >> [...] >> My point remains: >> WRI could have a much more direct notion of number, and equality, >> that >> would make it easy to implement my choice of arithmetic or theirs or >> yours. >> They didn't. The default is not completely reliable. People write to >> this newsgroup, periodically, saying Huh? what's going on? I found a >> bug! > > This is, I am afraid, nonsense. Nothing would make it "easy" to > implement significance arithmetic across the spectrum of Mathematica's > numerical engine. To do so efficiently, reliably, maintainably, etc. > is, well, a significant task. Jerry Keiper could do it. Mark Sofroniou > could do it. I do not think I could do it, at least not very well. > And, as the saying goes, "I have me doubts about thee". OK, I did not mean it would be easy to reproduce what Jerry Keiper did, but after all, he did do it using ordinary arithmetic at its base. What I did mean is that programs to do arithmetic "the machine way" would run at machine speed (= easy); the programs to do software bigfloats without significance tracking would run faster (=easier) than including significance tracking. And that if one wished to patch-up such code with built-in tracking ,after the fact by re-stating the precision after each operation, that would be slower (= not as easy) than avoiding it in the first place. So, easy= easy for the computer. I do think that people write to the newsgroup reporting what they think of as bugs, but are actually the deliberate consequences of the design of arithmetic. > > >> As for the experimental and computational notions of (im)precision, I >> think there is an issue of using the same words with different meanings. >> Similar but unfortunately different. Precision of a floating point >> number F is simply the number of bits in the fraction. If you impute >> some uncertainty to F, you can store that in another piece of data D in >> the computer. If you want to assert that F and D together represent a >> distribution of a certain kind you can also compute with that. >> >> RJF >> [...] > > Related to the above (I think), you stated earlier in this thread that > the differences in terminology usage can be troublesome. I agree that > the meaning of Mathematica's Precision and, to a lesser extent, > Accuracy, might cause initial confusion to one unfamiliar with the > software but well versed in Numerical Analysis. I would expect such > people to catch on after being bitten once or twice, and either get > used to the distinctions, or use different software. yes, but there are not too many well versed in numerical analysis. > > This strikes me as similar to the situation wherein Append and Prepend > are O(n) rather than O(1) complexity operations, since they rewrite > their List arguements in full. A CS person new to Mathematica might > well assume List is akin to the CS notion of a (singly or doubly) > linked list. After learning otherwise they'd probably not be too > flustered, other than perhaps to mutter that the naming of "List" was > problematic. Even that would perhaps abate once they get accustomed to > the very general Mathematica notion of a List. After all, a linked > list is a modestly arcane structure to those outside CS, and most > general software users are not from inside CS, and most CS people will > understand that. Similar, yes. Dissimilar in the sense that the List operations return expected results, just slower. But arithmetic returns (on occasion) unexpected results. RJF From mathgroup-adm at smc.vnet.net Wed Jul 20 04:37:43 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id DF9596BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:37:42 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9bicG011062; Wed, 20 Jul 2011 04:37:44 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id CDF66A813E; Wed, 20 Jul 2011 04:37:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 29AD5A80ED; Wed, 20 Jul 2011 04:37:42 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24025 for mathgroup-newout; Wed, 20 Jul 2011 06:30:58 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24020 for mathgroup-newsend; Wed, 20 Jul 2011 06:30:57 -0400 (EDT) Date: Wed, 20 Jul 2011 06:30:57 -0400 (EDT) Message-Id: <201107201030.GAA24020 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120357] Re: Find position of nonzero elements References: <201107191053.GAA10147 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.92120 On Tue, 19 Jul 2011, Dominic Wörner wrote: > Hi, > > How can I find the indices i and j of all nonzero elements of a matrix. > I want that because there are only some nonzero elements in a huge > matrix. > > Best regards, > Dominic Dominic, how about sa = SparseArray[IdentityMatrix[4]] sa["Properties"] sa["NonzeroPositions"] Oliver > > From mathgroup-adm at smc.vnet.net Wed Jul 20 04:40:51 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 43BB16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:40:51 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9eq0X011383; Wed, 20 Jul 2011 04:40:52 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 859B2A813E; Wed, 20 Jul 2011 04:40:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id AF891BF42E; Wed, 20 Jul 2011 04:40:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24143 for mathgroup-newout; Wed, 20 Jul 2011 06:33:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24138 for mathgroup-newsend; Wed, 20 Jul 2011 06:33:50 -0400 (EDT) Date: Wed, 20 Jul 2011 06:33:50 -0400 (EDT) Message-Id: <201107201033.GAA24138 at smc.vnet.net> From: Sebastian Hofer <sebhofer at gmail.com> Subject: [mg120373] Re: Find position of nonzero elements Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93021 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_10_99 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Does ArrayRules work? From mathgroup-adm at smc.vnet.net Wed Jul 20 04:42:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 25DC96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:42:40 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9gfvJ011472; Wed, 20 Jul 2011 04:42:41 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 258D0BF4B5; Wed, 20 Jul 2011 04:42:41 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 9D1C9BF482; Wed, 20 Jul 2011 04:42:39 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24086 for mathgroup-newout; Wed, 20 Jul 2011 06:32:24 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24081 for mathgroup-newsend; Wed, 20 Jul 2011 06:32:24 -0400 (EDT) Date: Wed, 20 Jul 2011 06:32:24 -0400 (EDT) Message-Id: <201107201032.GAA24081 at smc.vnet.net> From: carlos at colorado.edu Subject: [mg120365] Total plot width To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93021 How can I specify the total plot width in Mathematica? I was looking for something like AbsolutePlotWidth->250 (points implied) but havent found that option in the documentation. There is AspectRatio, but that is not a dimension. Thanks. From mathgroup-adm at smc.vnet.net Wed Jul 20 04:44:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6C3F66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:44:19 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9iKH0011643; Wed, 20 Jul 2011 04:44:20 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 66611BF4B5; Wed, 20 Jul 2011 04:44:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id CF4EFBF42E; Wed, 20 Jul 2011 04:44:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24151 for mathgroup-newout; Wed, 20 Jul 2011 06:34:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24146 for mathgroup-newsend; Wed, 20 Jul 2011 06:34:01 -0400 (EDT) Date: Wed, 20 Jul 2011 06:34:01 -0400 (EDT) Message-Id: <201107201034.GAA24146 at smc.vnet.net> From: Elizabeth Latta <elizabeth at elizabethlatta.com> Subject: [mg120374] Re: Using Plot3D; rotating the plot but, getting a different image after exporting. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93315 I`ve never had a problem. I rotate then right click and choose "Save Graphic As..." -Elizabeth ----- www.elizabethlatta.com From mathgroup-adm at smc.vnet.net Wed Jul 20 04:45:33 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9D7366BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:45:33 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9jZcS011741; Wed, 20 Jul 2011 04:45:35 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id ED1A0BF42E; Wed, 20 Jul 2011 04:45:34 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 6EB9FA8195; Wed, 20 Jul 2011 04:45:33 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24175 for mathgroup-newout; Wed, 20 Jul 2011 06:34:34 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24170 for mathgroup-newsend; Wed, 20 Jul 2011 06:34:33 -0400 (EDT) Date: Wed, 20 Jul 2011 06:34:33 -0400 (EDT) Message-Id: <201107201034.GAA24170 at smc.vnet.net> From: Sseziwa Mukasa <mukasa at gmail.com> Subject: [mg120377] Re: Find position of nonzero elements References: <201107191053.GAA10147 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93315 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_300_399 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Position[matrix,Except[0]] If it's machine precision you may need to do Position[matrix,Except[0.]] On Jul 19, 2011, at 6:53 AM, Dominic W=F6rner wrote: > Hi, > > How can I find the indices i and j of all nonzero elements of a matrix. > I want that because there are only some nonzero elements in a huge > matrix. > > Best regards, > Dominic > From mathgroup-adm at smc.vnet.net Wed Jul 20 04:47:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D98196BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:47:58 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9lxgP011930; Wed, 20 Jul 2011 04:47:59 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 0C138BF4B5; Wed, 20 Jul 2011 04:47:59 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 74DCFBF482; Wed, 20 Jul 2011 04:47:57 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24015 for mathgroup-newout; Wed, 20 Jul 2011 06:30:47 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24010 for mathgroup-newsend; Wed, 20 Jul 2011 06:30:46 -0400 (EDT) Date: Wed, 20 Jul 2011 06:30:46 -0400 (EDT) Message-Id: <201107201030.GAA24010 at smc.vnet.net> From: "Tong Shiu-sing" <sstong at phy.cuhk.edu.hk> Subject: [mg120356] Plotting a star map References: <201107140922.FAA15682 at smc.vnet.net> <201107141114.HAA17001 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93915 Dear All, I have the coordinates (RA and Decl) of some stars and nebulae in a small part of the celestial sphere and want to plot them as a star map. What projection method should I use? Does Mathematica has a standard package for doing it (just like that for the geo-data)? How do specify the boundary of the plot. Regards, Dominic From mathgroup-adm at smc.vnet.net Wed Jul 20 04:49:37 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 168C36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:49:37 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9ncTX012076; Wed, 20 Jul 2011 04:49:38 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 2FFF3A8190; Wed, 20 Jul 2011 04:49:38 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 9B23DBF42E; Wed, 20 Jul 2011 04:49:36 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24182 for mathgroup-newout; Wed, 20 Jul 2011 06:34:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24177 for mathgroup-newsend; Wed, 20 Jul 2011 06:34:45 -0400 (EDT) Date: Wed, 20 Jul 2011 06:34:45 -0400 (EDT) Message-Id: <201107201034.GAA24177 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120378] Imported Data in Mathematica Player or CDF Documents To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93915 Hello everyone, I'm in the process of creating a set of Mathematica Player documents for my students, and for many of them, I need to import data from text files. When I convert the notebooks to CDF, is the imported data cached? Can I simply leave the Import function in the player document? Or do I have to copy and paste the data manually into a variable? Any advice would be much appreciated, Gregory From mathgroup-adm at smc.vnet.net Wed Jul 20 04:50:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 808716BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:50:59 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9p0X5012206; Wed, 20 Jul 2011 04:51:00 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id BD3C6BF42E; Wed, 20 Jul 2011 04:51:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B38FFBF4B6; Wed, 20 Jul 2011 04:50:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24034 for mathgroup-newout; Wed, 20 Jul 2011 06:31:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24029 for mathgroup-newsend; Wed, 20 Jul 2011 06:31:08 -0400 (EDT) Date: Wed, 20 Jul 2011 06:31:08 -0400 (EDT) Message-Id: <201107201031.GAA24029 at smc.vnet.net> From: Murray Eisenberg <murray at math.umass.edu> Subject: [mg120358] Re: Find position of nonzero elements Reply-To: murray at math.umass.edu References: <201107191053.GAA10147 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93915 There must be a simpler way, but here's one way. mat = {{-2, -3, 0, -1}, {3, -2, 0, 2}, {0, -1, 1, 2}}; mn = Dimensions[mat]; ij = Table[{i, j}, {i, First@mn}, {j, Last@mn}]; Pick[Flatten[indices, 1], Thread[0 != Flatten@mat]] {{1,1}, {1,2}, {1,4}, {2,1}, {2,2}, {2,4}, {3,2}, {3,3}, {3,4}} The difficulty is that Mathematica, in contrast to some programming languages, really has no sense of higher-order arrays, just of 1-dimensional lists, so that it really has no such thing as a matrix, just a list of lists. On 7/19/11 6:53 AM, Dominic W=F6rner wrote: > Hi, > > How can I find the indices i and j of all nonzero elements of a matrix. > I want that because there are only some nonzero elements in a huge > matrix. > > Best regards, > Dominic > -- Murray Eisenberg murray at math.umass.edu Mathematics & Statistics Dept. Lederle Graduate Research Tower phone 413 549-1020 (H) University of Massachusetts 413 545-2859 (W) 710 North Pleasant Street fax 413 545-1801 Amherst, MA 01003-9305 From mathgroup-adm at smc.vnet.net Wed Jul 20 04:52:01 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B09F96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:52:01 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9q2ZH012292; Wed, 20 Jul 2011 04:52:02 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 94CE5A80ED; Wed, 20 Jul 2011 04:52:02 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E6974A8190; Wed, 20 Jul 2011 04:52:00 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24167 for mathgroup-newout; Wed, 20 Jul 2011 06:34:23 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24161 for mathgroup-newsend; Wed, 20 Jul 2011 06:34:22 -0400 (EDT) Date: Wed, 20 Jul 2011 06:34:22 -0400 (EDT) Message-Id: <201107201034.GAA24161 at smc.vnet.net> From: =?iso-8859-1?Q?Dominic_W=F6rner?= <dominic.woerner at mpi-hd.mpg.de> Subject: [mg120376] Re: Find position of nonzero elements References: <201107191053.GAA10147 at smc.vnet.net> <Pine.LNX.4.63.1107190532290.28777 at wopr.wolfram.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.93915 Thanks Oliver and also Andy. This is very good to know! Am 19.07.2011 um 12:33 schrieb Oliver Ruebenkoenig: > On Tue, 19 Jul 2011, Dominic W=F6rner wrote: > >> Hi, >> >> How can I find the indices i and j of all nonzero elements of a matrix. >> I want that because there are only some nonzero elements in a huge >> matrix. >> >> Best regards, >> Dominic > > Dominic, > > how about > > sa = SparseArray[IdentityMatrix[4]] > sa["Properties"] > sa["NonzeroPositions"] > > Oliver > >> >> From mathgroup-adm at smc.vnet.net Wed Jul 20 04:53:37 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AE9A36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:53:37 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9rdos012419; Wed, 20 Jul 2011 04:53:39 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id C128DA813E; Wed, 20 Jul 2011 04:53:38 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 47C1FA80ED; Wed, 20 Jul 2011 04:53:37 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24064 for mathgroup-newout; Wed, 20 Jul 2011 06:31:52 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24058 for mathgroup-newsend; Wed, 20 Jul 2011 06:31:51 -0400 (EDT) Date: Wed, 20 Jul 2011 06:31:51 -0400 (EDT) Message-Id: <201107201031.GAA24058 at smc.vnet.net> From: gonzorascal <djw22 at duke.edu> Subject: [mg120362] Inverse of Interpolating Function? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.94214 Hello All, I am working with an Interpolating Function of an oscillating solution (time series) to a differential equation. I am trying to find the period and pulse width of the oscillation. To do this I would like to have an inverse of my function y[t] (so I would have t[y]). I realize this function would be multivalued (that's what I want to find the period). I am not having success using Mathematica's InverseFunction[] or Reduce[] commands. Does anyone have any experience or suggestions with this sort of thing (either finding Inverse Interpolating Functions or another method for period and pulse width)? Thank you. -GR From mathgroup-adm at smc.vnet.net Wed Jul 20 04:56:08 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6AB2C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:56:08 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9u9MJ013072; Wed, 20 Jul 2011 04:56:09 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id AD0ADA80ED; Wed, 20 Jul 2011 04:56:09 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C120FBF42E; Wed, 20 Jul 2011 04:56:07 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24122 for mathgroup-newout; Wed, 20 Jul 2011 06:33:19 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24117 for mathgroup-newsend; Wed, 20 Jul 2011 06:33:18 -0400 (EDT) Date: Wed, 20 Jul 2011 06:33:18 -0400 (EDT) Message-Id: <201107201033.GAA24117 at smc.vnet.net> From: Bill Rowe <readnews at sbcglobal.net> Subject: [mg120370] Re: Find position of nonzero elements To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.94214 On 7/19/11 at 6:53 AM, dominic.woerner at mpi-hd.mpg.de (Dominic W=C3=B6rner) wrote: >How can I find the indices i and j of all nonzero elements of a >matrix. I want that because there are only some nonzero elements in >a huge matrix. I will assume your matrix is not currently a SparseArray. If so, do the following Most[ArrayRules@SparseArray@m] /. HoldPattern[a_ -> _] -> a where m is your matrix. ArrayRules applied to a SparseArray returns a list of the form {i,j}->x where i,j are the indices of a non-zero entry and x is the value of that entry. The last rule in this list will be {_,_}->0 which is default rule for elements with a zero value you aren't interested in. Finally, the replacement rule simply extracts the {i,j} portion of each rule for a non-zero entry. From mathgroup-adm at smc.vnet.net Wed Jul 20 04:57:25 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C27B96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 04:57:25 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6K9vRiW013184; Wed, 20 Jul 2011 04:57:27 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 0A239BF4B5; Wed, 20 Jul 2011 04:57:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 75348BF42E; Wed, 20 Jul 2011 04:57:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24071 for mathgroup-newout; Wed, 20 Jul 2011 06:32:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24066 for mathgroup-newsend; Wed, 20 Jul 2011 06:32:02 -0400 (EDT) Date: Wed, 20 Jul 2011 06:32:02 -0400 (EDT) Message-Id: <201107201032.GAA24066 at smc.vnet.net> From: blamm64 <blamm64 at charter.net> Subject: [mg120363] Re: Unexpected Behavior: SetDelayed versus Set References: <201107181013.GAA26867 at smc.vnet.net> <j03oa4$a83$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.94214 Thanks Daniel L., I have implemented essentially as you suggested, with a further check to Select only real and greater than zero results, choose Max of what remains, and to Print a diagnostic if Max returns -Infinity. Thanks Bobby, what can I write except Exp[WOW]!? Thanks Leonid, I am quite careful with the scoping in the notebook from which this example, paired down, came. In the notebook, as it currently exists, from which this example was extracted, aLinQS and bQuadQS are parameterized, I just opted to make the example less cluttered. I did read the links you provided and they were very helpful. Now, if I can just find that baseball cap with "DA" on it, I have to wear it for a while ... . From mathgroup-adm at smc.vnet.net Wed Jul 20 05:00:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 27FE56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:00:21 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA0KGf013586; Wed, 20 Jul 2011 05:00:22 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 3E464BF4B5; Wed, 20 Jul 2011 05:00:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D216FBF483; Wed, 20 Jul 2011 05:00:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24158 for mathgroup-newout; Wed, 20 Jul 2011 06:34:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24153 for mathgroup-newsend; Wed, 20 Jul 2011 06:34:12 -0400 (EDT) Date: Wed, 20 Jul 2011 06:34:12 -0400 (EDT) Message-Id: <201107201034.GAA24153 at smc.vnet.net> From: "Hobbs, Sylvia (DPH)" <sylvia.hobbs at state.ma.us> Subject: [mg120375] Re: Using Plot3D; rotating the plot but, getting a different image after exporting. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.94814 It's always the obvious. So there are two ways of rotating, using the rotate function command or just taking an unrotated graph and manually rotating it with the mouse rather than function. So it appears that the exported mouse rotated jpg saves as rotated, but the exported function rotated jpg exports unrotated. Sylvia Hobbs ________________________________________ From: Elizabeth Latta [elizabeth at elizabethlatta.com] Sent: Tuesday, July 19, 2011 9:10 AM To: Hobbs, Sylvia (DPH); ss2011 at wolframscience.com; mathgroup at smc.vnet.net Subject: [mg120375] Re: RE: Using Plot3D; rotating the plot but, getting a different image after exporting. I`ve never had a problem. I rotate then right click and choose "Save Graphic As..." -Elizabeth ----- www.elizabethlatta.com From mathgroup-adm at smc.vnet.net Wed Jul 20 05:01:58 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id CB3E36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:01:58 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA20Zw013758; Wed, 20 Jul 2011 05:02:00 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 189DBBF42E; Wed, 20 Jul 2011 05:02:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 70282A8194; Wed, 20 Jul 2011 05:01:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24137 for mathgroup-newout; Wed, 20 Jul 2011 06:33:40 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24132 for mathgroup-newsend; Wed, 20 Jul 2011 06:33:39 -0400 (EDT) Date: Wed, 20 Jul 2011 06:33:39 -0400 (EDT) Message-Id: <201107201033.GAA24132 at smc.vnet.net> From: Richard Fateman <fateman at eecs.berkeley.edu> Subject: [mg120372] Re: remarks on significance arithmetic implementation [Was: Re: Numerical accuracy/precision - this is a bug or a feature?] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.95414 On 7/19/2011 6:49 PM, DrMajorBob wrote: > As before, I think much of this discussion is useless. But this > example DOES give me pause: > >> Consider the two expressions >> f[x_]:= (x-1)*(x+1) and g[x_]:=(x^2-1) >> >> which are analytically the same function. >> >> given the value v=Interval[{-1/2,1/2}] f[v] returns an interval with >> width 2. g[v] returns an interval with width 1/4. > > I don't see why we'd want significance tracking to act this way. > > Bobby > I think that it is considered too expensive to do it this way. If you use significance arithmetic most of the time, it can't be so expensive. Also, it is difficult to write a program to do it, in general. See http://www.cs.berkeley.edu/~fateman/papers/interval.pdf and look for SUE or Single Use Expressions. RJF From mathgroup-adm at smc.vnet.net Wed Jul 20 05:04:17 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EC6AC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:04:16 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA4IXA014051; Wed, 20 Jul 2011 05:04:18 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 32824A8195; Wed, 20 Jul 2011 05:04:18 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id ACECDA80ED; Wed, 20 Jul 2011 05:04:16 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24131 for mathgroup-newout; Wed, 20 Jul 2011 06:33:29 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24126 for mathgroup-newsend; Wed, 20 Jul 2011 06:33:29 -0400 (EDT) Date: Wed, 20 Jul 2011 06:33:29 -0400 (EDT) Message-Id: <201107201033.GAA24126 at smc.vnet.net> From: PA32R <tio540s1 at gmail.com> Subject: [mg120371] Re: Replace, test question References: <j0113e$qad$1 at smc.vnet.net> <j03ora$adr$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.95414 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ALLCAPS 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __PHISH_SPEAR_STRUCTURE_2 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 19, 4:12 am, Yves Klett <yves.kl... at googlemail.com> wrote: > Hi, > > you need to supply x as argument to PrimeQ... alternatively use PatternTest: > > {58, 61, 15, 66, 10, 2, 24, 81, 45, 84} /. x_ /; PrimeQ[x] -> P > > {58, P, 15, 66, 10, P, 24, 81, 45, 84} > > {58, 61, 15, 66, 10, 2, 24, 81, 45, 84} /. x_?PrimeQ -> P > > {58, P, 15, 66, 10, P, 24, 81, 45, 84} > > Regards, > Yves > > Am 18.07.2011 12:15, schriebPA32R: > > > > > > > > > I'm very new to Mathematica and trying to work my way through it. I > > don't understand why: > > {58, 61, 15, 66, 10, 2, 24, 81, 45, 84} /. x_ /; PrimeQ -> P > > returns: > > {58, 61, 15, 66, 10, 2, 24, 81, 45, 84} > > > I would expect it to take the list, replace everything in the list > > that matches any pattern and passes the PrimeQ test, i.e., is prime, > > with P to yield: > > {58, P, 15, 66, 10, P, 14, 81, 45, 84} > > > Can someone explain my misunderstanding? > > > Thanks. Thanks everyone, I got it done. The assistance is much appreciated. From mathgroup-adm at smc.vnet.net Wed Jul 20 05:05:22 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 224586BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:05:22 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA5N1i014182; Wed, 20 Jul 2011 05:05:23 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 569E4A80ED; Wed, 20 Jul 2011 05:05:23 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id BD2ABBF42E; Wed, 20 Jul 2011 05:05:21 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24107 for mathgroup-newout; Wed, 20 Jul 2011 06:32:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24102 for mathgroup-newsend; Wed, 20 Jul 2011 06:32:56 -0400 (EDT) Date: Wed, 20 Jul 2011 06:32:56 -0400 (EDT) Message-Id: <201107201032.GAA24102 at smc.vnet.net> From: "Hobbs, Sylvia (DPH)" <sylvia.hobbs at state.ma.us> Subject: [mg120368] Re: Using Plot3D; rotating the plot but, getting a different image after exporting. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.95414 Ditto that problem and it is not limited to 3D plots. I've had that problem with other rotated Mathematica graphics that I import as a jpg. I end up pasting the jpg into PowerPoint re-rotating it and saving it as the jpg I had hoped Mathematica would rotate. Any insight on Mathematica commands that fix this without bringing the graphic into other program would be great. If there isn't one, then maybe, just maybe this is a teeny weeny bug. Sylvia Hobbs ________________________________________ From: Gilmar Rodriguez-pierluissi [peacenova at yahoo.com] Sent: Tuesday, July 19, 2011 6:57 AM To: mathgroup at smc.vnet.net Subject: [mg120368] Using Plot3D; rotating the plot but, getting a different image after exporting. Sometimes, when I build a plot using Plot3D (or similar 3D plotting program); rotate the plot on the Mathematica platform and then export it; the jpeg or png picture that I get after exporting the plot is different than the original image generated by Plot3D. Is there any way to avoid this? Thank you for your help! - Gilmar Rodriguez Pierluissi From mathgroup-adm at smc.vnet.net Wed Jul 20 05:08:09 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D35526BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:08:09 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA8Bdn014357; Wed, 20 Jul 2011 05:08:11 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id D79EABF483; Wed, 20 Jul 2011 05:08:10 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 2506BBF42E; Wed, 20 Jul 2011 05:08:09 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24078 for mathgroup-newout; Wed, 20 Jul 2011 06:32:13 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24073 for mathgroup-newsend; Wed, 20 Jul 2011 06:32:13 -0400 (EDT) Date: Wed, 20 Jul 2011 06:32:13 -0400 (EDT) Message-Id: <201107201032.GAA24073 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120364] Possible Bug in Dates Supplied with FinancialData Function To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100015 Hello everyone, Not sure whether I've misunderstood how FinancialData works, but it seems to me that the wrong date is attached to prices if they are downloaded using a monthly frequency. I used the following start and end dates. seriesStartDate = {2009, 01, 01}; seriesEndDate = {2011, 6, 30}; I download daily prices for Apple Inc. by running dailyPrices = FinancialData["AAPL", {seriesStartDate, seriesEndDate, =93Day=94}] If I then download monthly prices by running monthlyPrices = FinancialData["AAPL", {seriesStartDate, seriesEndDate, =93Month=94}] the observations are dated at the beginning of each month but correspond to the price on the last day of the month. The price of Apple on 2009-01-30, for example, when downloaded as daily is $90.13 but when downloaded as monthly, that same price is date stamped 2009-01-02, that is, at the beginning of the month. So, when downloading using a monthly frequency, the date stamps may mislead you into thinking that you are getting beginning-of-month prices when, in fact, you are getting end-of-month prices. I almost always need end-of-month prices, so to get the correct dates, I download as daily and extract the last daily observation for each month GatherBy[dailyPrices, #[[1, {1, 2}]] &] Last /@% You could do the same using Cases. Regards, Gregory From mathgroup-adm at smc.vnet.net Wed Jul 20 05:09:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3C9F66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:09:52 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA9rwZ014510; Wed, 20 Jul 2011 05:09:53 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 13580BF483; Wed, 20 Jul 2011 05:09:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 1F409A80ED; Wed, 20 Jul 2011 05:09:51 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24057 for mathgroup-newout; Wed, 20 Jul 2011 06:31:41 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24052 for mathgroup-newsend; Wed, 20 Jul 2011 06:31:40 -0400 (EDT) Date: Wed, 20 Jul 2011 06:31:40 -0400 (EDT) Message-Id: <201107201031.GAA24052 at smc.vnet.net> From: Andrzej Kozlowski <akoz at mimuw.edu.pl> Subject: [mg120361] Re: Transforming an expression to publication form References: <201107191057.GAA10297 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100015 On 19 Jul 2011, at 11:57, carlos at colorado.edu wrote: > Suppose I have the expression > > C11=A*Em*(4-3*omega^2+nu*(-8+3*omega^2)+(-4+8*nu)*Cos[kappa]); > > I want to transform this into > > C11pub=Em*A*(4*(1-2*nu)*(1-Cos[kappa])-3*(1-nu)*omega^2); > > which is the exactly the way it has to appear in a journal > publication, > once mapped to LaTeX. Both C11 and C11pub have the > same LeafCount (27), and C11 is invariant under Simplify > and FullSimplify. > > How do I accomplish C11 -> C11pub within Mathematica, > without using any extra packages? BTW this is part of one > of 36 matrix entries, so transforming all by hand takes a while. > On the one hand: in general, it is not reasonable to expect Mathematica to do such things. It is not really intended for this purpose and while one can often succeed by using special tricks, there is no general approach and I don't think it is worth spending time on uncovering the tricks needed in an individual case. On the other hand, in this particular case it is rather easy to see these "tricks". Namely: C11 = A*Em*(4 - 3*omega^2 + nu*(-8 + 3*omega^2) + (-4 + 8*nu)*Cos[kappa]) Collect[Collect[C11, omega, Factor], {Em, A}] A Em (4 (2 nu-1) (cos(kappa)-1)+3 (nu-1) omega^2) This is essentially your C11pub except for some signs in a few places. Andrzej Kozlowski From mathgroup-adm at smc.vnet.net Wed Jul 20 05:09:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 077086BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:09:55 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KA9uOS014517; Wed, 20 Jul 2011 05:09:56 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 121D4A80ED; Wed, 20 Jul 2011 05:09:56 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C7545BF4B5; Wed, 20 Jul 2011 05:09:53 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24051 for mathgroup-newout; Wed, 20 Jul 2011 06:31:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24046 for mathgroup-newsend; Wed, 20 Jul 2011 06:31:30 -0400 (EDT) Date: Wed, 20 Jul 2011 06:31:30 -0400 (EDT) Message-Id: <201107201031.GAA24046 at smc.vnet.net> From: Daniel Lichtblau <danl at wolfram.com> Subject: [mg120360] Re: numeric Groebner bases et al [Was Re: Numerical accuracy/precision - this is a bug or a feature?] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100015 On 07/19/2011 05:54 AM, Richard Fateman wrote: > [...] > I gather from previous correspondence (DanL), that what significance > arithmetic is used for is a decision point as to whether some value is > or is not possibly zero. > The value is presumably the result of evaluating a (multivariate) > polynomial whose coefficients are exact rationals [or maybe not] at a > point where the coefficients are known as intervals [or maybe exact]. > Perhaps DanL can advise on this characterization. It's not that, but simple coefficient arithmetic e.g. in running Buchberger's algorithm or one of the more recent alternatives. One has to know when some linear combination of coefficients cancels. > [...] > I don't think there is a need to produce an independent implementation > of anything; the same abstract structure of algorithms should hold. It does, in running Buchberger's algorithm. Not sure if that was specifically what you had in mind here but it seems relevant to mention. > The idea that one must come up with a different proof (that is, by not > emulating the other proof) is irrelevant, Slightly tangential: Kondratyev et al proposed a variant to Groebner bases, which uses a variant of Buchberger's algorithm. In his thesis, Kondratyev did require a "different" set of proofs to show termination and correctness. Related to the usual proofs, but by no means identical and not exactly what i would view as emulation. > but as it happens, the > algorithm for evaluating a polynomial with guaranteed error does NOT > emulate significance arithmetic by carrying along extra baggage at each > operation. Crudely speaking, it evaluates the polynomial in > floating-point, and then it evaluates the polynomial with the signs of > all the coefficients changed to +. > > see slide 21 in > http://www-pequan.lip6.fr/~graillat/papers/slides_MIMS.pdf > which is something I just found with Google. > > RJF Certainly there are various methods of gauging precision loss in numeric evaluation of polynomials, and some may be better than blind significance arithmetic. The slides look like something I should check more closely. Daniel Lichtblau Wolfram Research From mathgroup-adm at smc.vnet.net Wed Jul 20 05:12:23 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2FA516BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:12:23 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KACJJ2014748; Wed, 20 Jul 2011 05:12:24 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 38EC2BF4B6; Wed, 20 Jul 2011 05:12:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 64B97BF417; Wed, 20 Jul 2011 05:12:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24099 for mathgroup-newout; Wed, 20 Jul 2011 06:32:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24094 for mathgroup-newsend; Wed, 20 Jul 2011 06:32:45 -0400 (EDT) Date: Wed, 20 Jul 2011 06:32:45 -0400 (EDT) Message-Id: <201107201032.GAA24094 at smc.vnet.net> From: Ray Koopman <koopman at sfu.ca> Subject: [mg120367] Re: MultinormalDistribution Question References: <201107100901.FAA24634 at smc.vnet.net> <ivel76$89d$1 at smc.vnet.net> <ivuc25$grq$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100314 On Jul 17, 3:03 am, Steve <s... at epix.net> wrote: > [...] > What I really need to do is perform this analysis on test data for > which I have only a few data points, hence the Student T distribution > would be more appropriate than the Normal distribution. Secondly, > values for the "independent" and "dependent" variables have no > physical meaning below zero. So this implies that I need truncated > distributions. I'm hoping that the solution Andrzej provided can be > generalized for these added complications. > Here are my 9 {F,t} data points where "F" is considered "independent" > and t considered "dependent". > {{1.01041, 0.3152}, {10.455, 0.3386}, {17.9032, 0.2534}, {24.9581, > 0.5412}, {26.4688, 0.3251}, {27.4651, 0.4428}, {30.1682, > 0.3402}, {36.6174, 0.2106}, {45.6129, 0.2154}} > Would someone be so kind as to plop this data into their notebook to > confirm a solution or two for me ? My results are below which are > based on truncating the Student T distribution, 8 degrees of freedom > and a calculated rho of -0.2327. > [...] Another approach is to regress u = log[t] on f linearly. This solves the problem of keeping the conditional distributions of t non-negative, but makes the regression of t on f nonlinear. For your data, switching to u increases the correlation, but the conditional s.d. is still bigger than the marginal s.d., so there is still room for questioning the whole exercise. FWTW, here are the numbers I got: {mf, sf} = {Mean@f, StandardDeviation@f} {24.5177, 13.3704} {mu, su} = {Mean@u, StandardDeviation@u} {-1.1482, .311145} r = Correlation[f,u] -.322776 b = r*su/sf (* slope *) -.00751142 a = mu - b*mf (* intercept *) -.964034 se = su*Sqrt[(1-r^2)(n-1)/(n-2)] (* conditional s.d. *) .314825 Table[{x, CDF[StudentTDistribution[n-2], (a+b*x-Log[.5])/se]}, {x,0,50,5}] (* f, Pr[(t|f) > .5] *) {{0, .209020}, { 5, .179928}, {10, .154056}, {15, .131283}, {20, .111422}, {25, .0942435}, {30, .0794909}, {35, .0669001}, {40, .0562108}, {45, .0471758}, {50, .0395667}} From mathgroup-adm at smc.vnet.net Wed Jul 20 05:13:32 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EFB086BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:13:31 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KADXot014809; Wed, 20 Jul 2011 05:13:33 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 23257BF417; Wed, 20 Jul 2011 05:13:33 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 8EF40A813E; Wed, 20 Jul 2011 05:13:31 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24092 for mathgroup-newout; Wed, 20 Jul 2011 06:32:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24087 for mathgroup-newsend; Wed, 20 Jul 2011 06:32:34 -0400 (EDT) Date: Wed, 20 Jul 2011 06:32:34 -0400 (EDT) Message-Id: <201107201032.GAA24087 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120366] Re: Generating Arbitrary Linear Combinations of Functions To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100314 You say "this works well", but it actually can't, since f -- as you used it in defining "Data" -- is undefined. (You didn't give us all the code.) So I'll build the model, only. Clear[f, a, z, c] f[a_?NumberQ, x_?NumberQ, xi_?NumberQ, c_?NumberQ] := c Exp[-a (x - xi)^2/2]/Sqrt@a; f[a_, z_, c_][x_] := f[a, x, z, c] n = 10; aVec = Array[a, n]; zVec = Array[z, n]; cVec = Array[c, n]; model = Total@Through[(f @@@ Transpose@{aVec, zVec, cVec})@x] f[a[1], x, z[1], c[1]] + f[a[2], x, z[2], c[2]] + f[a[3], x, z[3], c[3]] + f[a[4], x, z[4], c[4]] + f[a[5], x, z[5], c[5]] + f[a[6], x, z[6], c[6]] + f[a[7], x, z[7], c[7]] + f[a[8], x, z[8], c[8]] + f[a[9], x, z[9], c[9]] + f[a[10], x, z[10], c[10]] Then, after f[oneArgument_] and "data" have ALSO been defined: nlm = NonlinearModelFit[data, model, Flatten@{aVec, zVec, cVec}, x] Bobby On Tue, 19 Jul 2011 05:55:32 -0500, Thomas Markovich <thomasmarkovich at gmail.com> wrote: > Hi All, > > I'm trying to curve fit an arbitrary linear combination of distributed > gaussians to a function -- each with their own set of parameters. > Currently, > if I want to use twenty functions, I do the following > > f[a_?NumberQ, x_?NumberQ, xi_?NumberQ, c_?NumberQ] := ( > c E^(- a (x - xi)^2/2))/Sqrt[a/=F0]; > Data := Table[{n/50, N[f[n/50]]}, {n, -300, 300}]; > > model = f[a1, x, x1, c1] + f[a2, x, x2, c2] + f[a3, x, x3, c3] + > f[a4, x, x4, c4] + f[a5, x, x5, c5] + f[a6, x, x6, c6] + > f[a7, x, x7, c7] + f[a8, x, x8, c8] + f[a9, x, x9, c9] + > f[a10, x, x10, c10] + f[a11, x, x11, c11] + f[a12, x, x12, c12] + > f[a13, x, x13, c13] + f[a14, x, x14, c14] + f[a15, x, x15, c15] + > f[a16, x, x16, c16] + f[a17, x, x17, c17] + f[a18, x, x18, c18] + > f[a19, x, x19, c19] + f[a20, x, x20, c20]; > nlm = NonlinearModelFit[Data, > model, {a1, x1, c1, a2, x2, c2, a3, x3, c3, a4, x4, c4, a5, x5, c5, > a6, > x6, > c6, a7, x7, c7, a8, x8, c8, a9, x9, c9, a10, x10, c10, a11, x11, > c11, > a12, x12, c12, a13, x13, c13, a14, x14, c14, a15, x15, c15, a16, x16, > c16, > a17, x17, c17, a18, x18, c18, a19, x19, c19, a20, x20, c20}, x]; > > > > This works well but it becomes tedious to create these linear > combinations > by hand. It would be wonderful to create a linear combination of > functions > with a vector of coefficients for a, xi, and c. I am just unsure of how > to > approach this and I was hoping that you guys could offer some insight > into > this. > > > > Best, > > > > Thomas -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Wed Jul 20 05:13:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EAD206BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:13:50 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KADqSj014893; Wed, 20 Jul 2011 05:13:52 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 03A1FA819A; Wed, 20 Jul 2011 05:13:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 63D5EA8194; Wed, 20 Jul 2011 05:13:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24041 for mathgroup-newout; Wed, 20 Jul 2011 06:31:20 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24036 for mathgroup-newsend; Wed, 20 Jul 2011 06:31:19 -0400 (EDT) Date: Wed, 20 Jul 2011 06:31:19 -0400 (EDT) Message-Id: <201107201031.GAA24036 at smc.vnet.net> From: Daniel Lichtblau <danl at wolfram.com> Subject: [mg120359] Re: sorting a nested list of 4-tuples References: <201107191055.GAA10229 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100314 On 07/19/2011 05:55 AM, Luis Valero wrote: > Dear Sirs, > > I want to sort a list of 4-tuples of real numbers, so that, the second 4-tuple has minimum distance to the first, the third, selected from the rest, ha minimum distance to the second, and so on. > > The distance is the euclidean distance, calculated with the first two elements of each 4-tuple. > > I have defined a function that work: > > orderedList[list_] := Module[{nearest}, > Flatten[ Nest[{ > Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, 2}]], #]&, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], > Delete[ #[[2]], Position[ #[[2]], nearest ] ] }&, { {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; > > > but I need to improve the temporal efficiency > > Thank you The complexity will show up either in needing to obtain a growing number of nearest items (to account for the fact that many may already ahve appeared), or removing selected items from further consideration. There may be a fancy way around these but I'm not seeing it offhand. At least not if we want to couple with a fast search for nearest items, using Nearest[]. A way to alleviate this is to gather newly selected items every so often and remove them in one shot. This adds to the coding complexity (required some debugging to get it to work, for one thing). But it does seem faster. I made no effort to tune for the removal interval (which need not be constant). There ar also some parts of the code that might be made slightly faster in other ways. n = 3000; data = RandomReal[{-100, 100}, {n, 4}]; chunksize = Ceiling[Log[n]]^2; denom = 10000.; moddata = Map[Take[#, 3] &, MapThread[Prepend, {data, Range[n]/denom}]]; nf = Nearest[moddata]; next = moddata[[1]]; taken = ConstantArray[False, n]; result = ConstantArray[{0., 0., 0., 0.}, n]; remove = ConstantArray[{0., 0., 0.}, chunksize]; result[[1]] = data[[1]]; remove[[1]] = moddata[[1]]; taken[[1]] = True; Timing[Do[ nextset = nf[next, 1 + Mod[j, chunksize, 1]]; posns = Round[denom*Map[First, nextset]]; k = 1; While[k < Length[nextset] && taken[[posns[[k]]]], k++;]; taken[[posns[[k]]]] = True; result[[j]] = data[[posns[[k]]]]; next = nextset[[k]]; remove[[Mod[j, chunksize, 1]]] = next; If[Mod[j, chunksize] == 0, done = True; posns = Apply[Alternatives, remove]; moddata = DeleteCases[moddata, posns]; nf = Nearest[moddata]; ]; , {j, 2, n}]] Out[639]= {0.57, Null} By comparison: In[640]:= Timing[result2 = orderedList[data];] Out[640]= {14.71, Null} In[641]:= result2 === result Out[641]= True Daniel Lichtblau WOlfram Research From mathgroup-adm at smc.vnet.net Wed Jul 20 05:16:01 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4991B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:16:01 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KAG24u015040; Wed, 20 Jul 2011 05:16:02 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 6842FBF417; Wed, 20 Jul 2011 05:16:02 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 9A977A80ED; Wed, 20 Jul 2011 05:16:00 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24193 for mathgroup-newout; Wed, 20 Jul 2011 06:34:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24187 for mathgroup-newsend; Wed, 20 Jul 2011 06:34:56 -0400 (EDT) Date: Wed, 20 Jul 2011 06:34:56 -0400 (EDT) Message-Id: <201107201034.GAA24187 at smc.vnet.net> From: Sseziwa Mukasa <mukasa at gmail.com> Subject: [mg120379] Re: sorting a nested list of 4-tuples References: <201107191055.GAA10229 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODY_SIZE_6000_6999 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __RUS_OBFU_PHONE 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Your function does not appear to work correctly, sometimes the list is in the wrong order, but orderedList2: orderedList2[list_] := Module[{first = First[list], rest = Rest[list], nearest, result}, result = {first}; Do[nearest = Nearest[rest -> Automatic, Last[result]]; result = Join[result, rest[[nearest]]]; rest = Drop[rest, nearest], {Length[rest]}]; result] seems faster anyway.: In[11]:= Module[{list = RandomReal[{0, 1}, {20, 4}], result1, result2}, result1 = Timing[orderedList[list]]; result2 = Timing[orderedList2[list]]; {result1[[2]] == result2[[2]], result1[[1]], result2[[1]], {list, result1[[2]], result2[[2]]}}] Out[11]= {False, 0.002556, 0.0007, {{{0.0780386, 0.220901, 0.748457, 0.548342}, {0.722099, 0.308747, 0.33661, 0.304516}, {0.623358, 0.761312, 0.884318, 0.21337}, {0.14872, 0.284139, 0.244084, 0.582692}, {0.0829757, 0.911987, 0.448848, 0.606659}, {0.312903, 0.703568, 0.747021, 0.126831}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.189339, 0.419192, 0.498754, 0.846607}, {0.661185, 0.455712, 0.31286, 0.387921}, {0.566059, 0.331815, 0.412978, 0.84236}, {0.714704, 0.335434, 0.417758, 0.0569088}, {0.855757, 0.0118403, 0.310144, 0.312894}, {0.278001, 0.874878, 0.289541, 0.199531}, {0.682503, 0.387263, 0.931379, 0.662633}, {0.8045, 0.264645, 0.595204, 0.534895}, {0.645246, 0.915467, 0.167849, 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.811736, 0.77314, 0.73452, 0.0771508}, {0.784869, 0.582503, 0.0986897, 0.152786}, {0.426251, 0.135863, 0.465908, 0.228462}}, {{0.0780386, 0.220901, 0.748457, 0.548342}, {0.14872, 0.284139, 0.244084, 0.582692}, {0.189339, 0.419192, 0.498754, 0.846607}, {0.312903, 0.703568, 0.747021, 0.126831}, {0.278001, 0.874878, 0.289541, 0.199531}, {0.0829757, 0.911987, 0.448848, 0.606659}, {0.623358, 0.761312, 0.884318, 0.21337}, {0.645246, 0.915467, 0.167849, 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.811736, 0.77314, 0.73452, 0.0771508}, {0.784869, 0.582503, 0.0986897, 0.152786}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.714704, 0.335434, 0.417758, 0.0569088}, {0.722099, 0.308747, 0.33661, 0.304516}, {0.682503, 0.387263, 0.931379, 0.662633}, {0.661185, 0.455712, 0.31286, 0.387921}, {0.566059, 0.331815, 0.412978, 0.84236}, {0.426251, 0.135863, 0.465908, 0.228462}, {0.8045, 0.264645, 0.595204, 0.534895}, {0.855757, 0.0118403, 0.310144, 0.312894}}, {{0.0780386, 0.220901, 0.748457, 0.548342}, {0.189339, 0.419192, 0.498754, 0.846607}, {0.14872, 0.284139, 0.244084, 0.582692}, {0.566059, 0.331815, 0.412978, 0.84236}, {0.8045, 0.264645, 0.595204, 0.534895}, {0.722099, 0.308747, 0.33661, 0.304516}, {0.661185, 0.455712, 0.31286, 0.387921}, {0.784869, 0.582503, 0.0986897, 0.152786}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.714704, 0.335434, 0.417758, 0.0569088}, {0.426251, 0.135863, 0.465908, 0.228462}, {0.855757, 0.0118403, 0.310144, 0.312894}, {0.682503, 0.387263, 0.931379, 0.662633}, {0.623358, 0.761312, 0.884318, 0.21337}, {0.811736, 0.77314, 0.73452, 0.0771508}, {0.312903, 0.703568, 0.747021, 0.126831}, {0.278001, 0.874878, 0.289541, 0.199531}, {0.645246, 0.915467, 0.167849, 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.0829757, 0.911987, 0.448848, 0.606659}}}} From the above output it seems to me orderedList is incorrect: In[12]:= Nearest[{{0.7220990188851284`, 0.30874655560999353`, 0.33661039115480085`, 0.30451607189733565`}, {0.623358140247426`, 0.7613121754790066`, 0.8843184964161348`, 0.21336965042896106`}, {0.14871956929750207`, 0.2841388256243189`, 0.2440839157054575`, 0.5826918077236027`}, {0.08297574175354927`, 0.9119868514832306`, 0.44884815651517496`, 0.606658888854545`}, {0.3129032093692543`, 0.7035682306379043`, 0.7470209852828422`, 0.126831036636313`}, {0.8471019825138335`, 0.4370412344560497`, 0.09243429503478429`, 0.03331005052172231`}, {0.18933936353633118`, 0.4191916563275504`, 0.49875370996337387`, 0.8466068811542358`}, {0.6611848899498884`, 0.455712283905654`, 0.31286031890780386`, 0.3879208331484807`}, {0.566058771065481`, 0.3318146887998126`, 0.41297814980274516`, 0.8423595336937795`}, {0.7147038318708883`, 0.33543423510640613`, 0.4177577945972242`, 0.056908774958363884`}, {0.8557567595586966`, 0.011840287587700837`, 0.31014365477384986`, 0.31289360223925855`}, {0.27800072513915963`, 0.8748776068932764`, 0.28954067774830894`, 0.19953109481447573`}, {0.6825027823624006`, 0.38726329607605536`, 0.9313788703031116`, 0.6626327289353637`}, {0.8045002220254145`, 0.26464489073341646`, 0.5952036781362782`, 0.5348945499518614`}, {0.6452463375631783`, 0.9154672494486176`, 0.16784916226023205`, 0.21084656084695386`}, {0.7896939168446158`, 0.9877454808787693`, 0.04056790678073363`, 0.09578312387470667`}, {0.8117363160995603`, 0.7731396349254072`, 0.7345204475002354`, 0.0771508252866615`}, {0.784869093354617`, 0.5825033331936824`, 0.09868967226141323`, 0.1527856209885663`}, {0.426250694413443`, 0.1358634032399666`, 0.46590788139431916`, 0.22846239863279472`}}, {0.07803858379747108`, 0.22090093831902768`, 0.7484574646075761`, 0.5483416965515358`}] Out[12]= {{0.189339, 0.419192, 0.498754, 0.846607}} Regards, Ssezi On Jul 19, 2011, at 6:55 AM, Luis Valero wrote: > Dear Sirs, > > I want to sort a list of 4-tuples of real numbers, so that, the second 4-tuple has minimum distance to the first, the third, selected from the rest, ha minimum distance to the second, and so on. > > The distance is the euclidean distance, calculated with the first two elements of each 4-tuple. > > I have defined a function that work: > > orderedList[list_] := Module[{nearest}, > Flatten[ Nest[{ > Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, 2}]], #] &, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], > Delete[ #[[2]], Position[ #[[2]], nearest ] ] } &, { {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; > > > but I need to improve the temporal efficiency > > Thank you > > > From mathgroup-adm at smc.vnet.net Wed Jul 20 05:17:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 857286BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 20 Jul 2011 05:17:19 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6KAHKMl015179; Wed, 20 Jul 2011 05:17:20 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 934D8A813E; Wed, 20 Jul 2011 05:17:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id F249EBF417; Wed, 20 Jul 2011 05:17:16 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24114 for mathgroup-newout; Wed, 20 Jul 2011 06:33:08 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA24109 for mathgroup-newsend; Wed, 20 Jul 2011 06:33:07 -0400 (EDT) Date: Wed, 20 Jul 2011 06:33:07 -0400 (EDT) Message-Id: <201107201033.GAA24109 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120369] Re: remarks on significance arithmetic implementation [Was: Re: Numerical accuracy/precision - this is a bug or a feature?] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.20.100314 As before, I think much of this discussion is useless. But this example DOES give me pause: > Consider the two expressions > f[x_]:= (x-1)*(x+1) and g[x_]:=(x^2-1) > > which are analytically the same function. > > given the value v=Interval[{-1/2,1/2}] f[v] returns an interval with > width 2. g[v] returns an interval with width 1/4. I don't see why we'd want significance tracking to act this way. Bobby On Tue, 19 Jul 2011 05:58:03 -0500, Richard Fateman <fateman at eecs.berkeley.edu> wrote: > On 7/18/2011 11:54 AM, Daniel Lichtblau wrote: >> >> [Caution: This may increase the entropy of the thread, and almost >> certainly will increase the ennui.] > Yep >> >> > ... snip ... a bunch of things I think we agree upon. >> To expand on "properly rounded floats" I will mention that >> Mathematica's significance arithmetic, in certain settings, is as >> conservative as interval arithmetic. Specifically this works out when >> the operations used are addition, multiplication, integer powering, or >> division with both operands approximate. Also required is that they >> have more significant digits than can be represented by the error >> recorder (that is to say, more than 16 or so digits when error is >> recorded as a 53-bit-mantissa float). The gist is that precision is >> altered downward in a way that will even account for second order >> error (and the higher order error terms that exist in computing x/y >> where x and y are both approximate bignums). > I am unclear on this zeroth, first, second order error categorization. > It seems to me that the critical problem, and one that is not addressed > by Mathematica, in interval arithmetic, is addressing dependence of > operands. Consider the two expressions > f[x_]:= (x-1)*(x+1) and g[x_]:=(x^2-1) > > which are analytically the same function. > > given the value v=Interval[{-1/2,1/2}] f[v] returns an interval with > width 2. g[v] returns an interval with width 1/4. > > The function g is obviously a lot better than f. > Same thing happens for v=0.1`2. f[v] is -0.99`269.. but g[v] is > -0.99`3.69... So according to Mathematica, g evaluates > to a full decimal digit higher accuracy. > > A true devotee of interval arithmetic (or of significance arithmetic) > would take the function body for f and rearrange it as g, > and also would require for comparisons such concepts as possibly-equal, > certainly-greater-than etc. And would need > to resolve meanings for empty intervals and other such things. Some of > these may in fact be in Mathematica's interval > arithmetic suite. They seem to be absent in the significance arithmetic > world, though there is a transition from one to the > other possible. > Note that Interval[0.1`2] returns the fairly nonsensical > Interval[{0.1,0.10}] but InputForm[%] shows > Interval[{0.098046875`1.9914337561691884, > 0.101953125`2.008400542026431}], maybe overkill. > Interval[{0.98,0.102}] might be OK. > > > There are ways of reducing semi-automatically, the number of repeat > occurrences of operands in such expressions, thereby improving the > interval widths. This (that is, computing "single use expressions") is > the kind of thing that would, I think, be useful and for which computer > algebra systems are especially appropriate. That, in combination with > some other tricks of interval "reliable" arithmetic would be helpful > (and for which I have written some programs, not in Mathematica > though). So the real contribution to interval arithmetic (or > significance arithmetic) of Mathematica would be if it were able to > reformulate some subset of expressions so that they were automatically > computed faster and more accurately. > > (One could argue that boosting the software precision will get the > answer accurately, especially if one ignores exponentially longer > run-times.) > > > For some discussion in the context of a (different) programming language > that is not much like Mathematica, see > > http://developers.sun.com/sunstudio/products/archive/whitepapers/tech-interval-final.pdf > > There are other, more expensive techniques. E.g. if p(x) is a > polynomial, what is p[Interval[{a,b}]] ? > Instead of just interval-alizing the + and * and ^, find the extrema of > p between a and b. > What is Sin[Interval[...]], etc. > >> >> It would not be hard to extend this to the taking of reciprocals and >> hence division of integer by float e.g. x --> 1/x. But as best I can >> tell from looking at the code, Mathematica does not do this, so error >> tracking in that case is purely first order. > > Maybe I'm not following here, but computing an interval for 1/x does not > seem difficult. >> >> >>> [...] >>> My point remains: >>> WRI could have a much more direct notion of number, and equality, >>> that >>> would make it easy to implement my choice of arithmetic or theirs or >>> yours. >>> They didn't. The default is not completely reliable. People write to >>> this newsgroup, periodically, saying Huh? what's going on? I found a >>> bug! >> >> This is, I am afraid, nonsense. Nothing would make it "easy" to >> implement significance arithmetic across the spectrum of Mathematica's >> numerical engine. To do so efficiently, reliably, maintainably, etc. >> is, well, a significant task. Jerry Keiper could do it. Mark Sofroniou >> could do it. I do not think I could do it, at least not very well. >> And, as the saying goes, "I have me doubts about thee". > > OK, I did not mean it would be easy to reproduce what Jerry Keiper did, > but after all, he did do it using ordinary arithmetic at its base. > What I did mean is that programs to do arithmetic "the machine way" > would run at machine speed (= easy); the programs to do software > bigfloats without significance tracking would run faster (=easier) than > including significance tracking. And that if one wished to patch-up > such code with built-in tracking ,after the fact by re-stating the > precision after each operation, that would be slower (= not as easy) > than avoiding it in the first place. > So, easy= easy for the computer. > > I do think that people write to the newsgroup reporting what they think > of as bugs, but are actually the deliberate consequences of the design > of arithmetic. >> >> >>> As for the experimental and computational notions of (im)precision, I >>> think there is an issue of using the same words with different >>> meanings. >>> Similar but unfortunately different. Precision of a floating point >>> number F is simply the number of bits in the fraction. If you impute >>> some uncertainty to F, you can store that in another piece of data D in >>> the computer. If you want to assert that F and D together represent a >>> distribution of a certain kind you can also compute with that. >>> >>> RJF >>> [...] >> >> Related to the above (I think), you stated earlier in this thread that >> the differences in terminology usage can be troublesome. I agree that >> the meaning of Mathematica's Precision and, to a lesser extent, >> Accuracy, might cause initial confusion to one unfamiliar with the >> software but well versed in Numerical Analysis. I would expect such >> people to catch on after being bitten once or twice, and either get >> used to the distinctions, or use different software. > yes, but there are not too many well versed in numerical analysis. >> >> This strikes me as similar to the situation wherein Append and Prepend >> are O(n) rather than O(1) complexity operations, since they rewrite >> their List arguements in full. A CS person new to Mathematica might >> well assume List is akin to the CS notion of a (singly or doubly) >> linked list. After learning otherwise they'd probably not be too >> flustered, other than perhaps to mutter that the naming of "List" was >> problematic. Even that would perhaps abate once they get accustomed to >> the very general Mathematica notion of a List. After all, a linked >> list is a modestly arcane structure to those outside CS, and most >> general software users are not from inside CS, and most CS people will >> understand that. > Similar, yes. Dissimilar in the sense that the List operations return > expected results, just slower. But arithmetic returns (on occasion) > unexpected results. > > RJF > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Thu Jul 21 03:51:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BA0936BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 03:51:50 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L8ppVq000824; Thu, 21 Jul 2011 03:51:52 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 910C6BF4B8; Thu, 21 Jul 2011 03:51:51 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A9CBCA8190; Thu, 21 Jul 2011 03:51:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06452 for mathgroup-newout; Thu, 21 Jul 2011 05:45:01 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06442 for mathgroup-newsend; Thu, 21 Jul 2011 05:45:01 -0400 (EDT) Date: Thu, 21 Jul 2011 05:45:01 -0400 (EDT) Message-Id: <201107210945.FAA06442 at smc.vnet.net> From: "Joseph O'Rourke" <orourke at scinix.smith.edu> Subject: [mg120381] ExampleData[{"Geometry3D", "Torus"}] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.83914 Is it possible to control the radii of a torus in Mathematica 8 using the ExampleData[] function? I cannot see how to get anything but the default torus. Thanks! From mathgroup-adm at smc.vnet.net Thu Jul 21 03:52:17 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id ACFD26BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 03:52:17 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L8qJxj000910; Thu, 21 Jul 2011 03:52:19 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 07C1BA8190; Thu, 21 Jul 2011 03:52:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 5838CBF4B8; Thu, 21 Jul 2011 03:52:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06562 for mathgroup-newout; Thu, 21 Jul 2011 05:47:33 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06555 for mathgroup-newsend; Thu, 21 Jul 2011 05:47:32 -0400 (EDT) Date: Thu, 21 Jul 2011 05:47:32 -0400 (EDT) Message-Id: <201107210947.FAA06555 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120395] Computable Document Format Replaces Player Notebooks To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.83914 Hi Everyone, Probably a silly question but I just want to be sure: Has the computable document format that is built into Mathematica replaced player notebooks, so that I no longer have to upload my notebooks to Wolfram for conversion? Regards, Gregory From mathgroup-adm at smc.vnet.net Thu Jul 21 03:54:28 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AD2086BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 03:54:28 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L8sTWT001195; Thu, 21 Jul 2011 03:54:29 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id A335FA8190; Thu, 21 Jul 2011 03:54:29 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 14E28A8195; Thu, 21 Jul 2011 03:54:28 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06472 for mathgroup-newout; Thu, 21 Jul 2011 05:45:23 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06467 for mathgroup-newsend; Thu, 21 Jul 2011 05:45:22 -0400 (EDT) Date: Thu, 21 Jul 2011 05:45:22 -0400 (EDT) Message-Id: <201107210945.FAA06467 at smc.vnet.net> From: Myeong Ae Kang <makang at purdue.edu> Subject: [mg120383] How to set the format of every output to traditionalform in txt files. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.84514 Hello. I wonder how I can set the default data format to "traditionalform" to run Mathematica on the command-line. I want to print all values in traditonalform, not including "traditonalform" in every "Print" command. Again, on the command line. Not on the GUI. From mathgroup-adm at smc.vnet.net Thu Jul 21 03:54:56 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A57306BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 03:54:56 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L8swBA001236; Thu, 21 Jul 2011 03:54:58 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id E6EFFA8194; Thu, 21 Jul 2011 03:54:57 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 04255A8190; Thu, 21 Jul 2011 03:54:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06463 for mathgroup-newout; Thu, 21 Jul 2011 05:45:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06458 for mathgroup-newsend; Thu, 21 Jul 2011 05:45:11 -0400 (EDT) Date: Thu, 21 Jul 2011 05:45:11 -0400 (EDT) Message-Id: <201107210945.FAA06458 at smc.vnet.net> From: Daniel Lichtblau <danl at wolfram.com> Subject: [mg120382] Re: sorting a nested list of 4-tuples References: <201107191055.GAA10229 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.84514 On 07/19/2011 05:55 AM, Luis Valero wrote: > Dear Sirs, > > I want to sort a list of 4-tuples of real numbers, so that, the second 4-tuple has minimum distance to the first, the third, selected from the rest, ha minimum distance to the second, and so on. > > The distance is the euclidean distance, calculated with the first two elements of each 4-tuple. > > I have defined a function that work: > > orderedList[list_] := Module[{nearest}, > Flatten[ Nest[{ > Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, 2}]], #]&, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], > Delete[ #[[2]], Position[ #[[2]], nearest ] ] }&, { {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; > > > but I need to improve the temporal efficiency > > Thank you I wanted to improve on my last proposed method and also say a bit about the computational complexity. First I'll note that a straightforward double iteration can be used. If coupled with Compile it should be reasonably fast, albeit still O(n^2) for a list of n elements. Also it will scale nicely with dimension in cases where we are not restricting the distance measure to the first two components of the tuples. Here is code for this. findClosestUniqueC = Compile[{{ll, _Real, 2}}, Module[{n = Length[ll], res = ll, posn, max, min, diff, dist, last, tmp}, max = (4.*Max[ll[[All, 1 ;; 2]]])^2; Do[ last = res[[j - 1, 1 ;; 2]]; posn = 0; min = max; Do[ diff = res[[k, 1 ;; 2]] - last; dist = diff.diff; If[dist < min, min = dist; posn = k]; , {k, j, n}]; res[[{j, posn}]] = res[[{posn, j}]]; , {j, 2, n - 1}]; res ] ]; The method I used in an earlier response, and will refine below, was based on Nearest[]. First some explanatory comments. It takes the first two components of each tuple and augments with a small "counter" value that allows us to determine which is the corresponding element in the original list. We start with a large "denominator", then prepend 1/denom to the first 2-tuple, 2/denom to the second 2-tuple, etc. The presence of this counter value can in fact lead to erroneous results by slightly offsetting distances based on the 2-tuple values alone. I now use a heuristic based on list size that should make such a failure unlikely in the version below. But it is not terribly clever and certainly can fail. A viable method would have to be based on minimal separation, which could be underestimated by sorting the flattened list of all values, and taking the smallest nonzero gap. We'll assume that the complexity of creating a one-argument Nearest[] function, given n values, is around O(n*log(n)). For modest dimension this seems to be about right, if I recall correctly. Once we have such a function we'll assume that the cost of looking up the k nearest values to a given value is O(k*log(n)). Again, this seems to be born out with experience as best I recall. Also I'll add that the implied multiplicative constant is much larger for lookup than for building the list. At this points there are various ways to go about the lookup in order to get the next closest value to a given one, from amongst all elements not already chosen. A guaranteed way is, if j elements have been chosen, find the j+1 nearest elements to the last one (so at least one will not already have been selected). If we build a Nearest function once, then we end up doing O(n) lookups, each finding O(n) closest elements. The overall complexity would be O(n^2*log(n)). (If we just call it anew every iteration, thats n alls of n*log(n) complexity, so no better.) A heuristic to reduce that, not guaranteed, would be to only look up the 7 or so closest, and try the full size needed only if all 7 have already been selected. Another way, this one guaranteed to bring down the complexity, is to discard those elements already chosen from further consideration, at intervals that are an appropriate function of n. If we do this every sqrt(n) elements, and rebuild the Nearest function, then we never need find more than sqrt(n) closest elements from amongst those still under consideration. So overall lookup cost will be no worse than O(n*sqrt(n)*log(n)). Meanwhile the cost of removing sqrt(n) elements form a list of n elements is O(n), and we do this sqrt(n) times so that comes to O(n^(3/2)). Finally the cost of building these Nearest functions sqrt(n) times, with O(n) elements each time, is O(n*log(n)*sqrt(n)). Overall cost: O(n^(3/2)*log(n)). In my earlier code I used a different "chunk" size, one that seemed like it might be sensible. It did work well for ranges I tried, but sqrt(n) seems to be the value with the guarantee. The use of a new Nearest function at intervals means I want to use an index computed modulo the interval length (the chunk size, in the code terminology). I also use the heuristic of trying only a few closest elements at first, grabbing more only when needed. Some testing indicates this happens relatively infrequently. So here is the updated code. It should be properly Module-ized, but I'm not spending more time to do that. n = 3200; data = RandomReal[{-100, 100}, {n, 4}]; chunksize = Ceiling[Sqrt[n]]; denom = 2^3*2^Ceiling[Log[2, n]]; moddata = Map[Take[#, 3] &, MapThread[Prepend, {data, Range[n]/denom}]]; nf = Nearest[moddata]; next = moddata[[1]]; taken = ConstantArray[False, n]; result = ConstantArray[{0., 0., 0., 0.}, n]; remove = ConstantArray[{0., 0., 0.}, chunksize]; result[[1]] = data[[1]]; remove[[1]] = moddata[[1]]; taken[[1]] = True; Timing[Do[ modj = Mod[j, chunksize, 1]; nextset = nf[next, Min[7, 1 + modj]]; posns = Round[denom*Map[First, nextset]]; k = 1; While[k <= Length[nextset] && taken[[posns[[k]]]], k++;]; If[k > Length[nextset], nextset = nf[next, 1 + modj]; posns = Round[denom*Map[First, nextset]]; k = 1; While[k < Length[nextset] && taken[[posns[[k]]]], k++;]; ]; taken[[posns[[k]]]] = True; result[[j]] = data[[posns[[k]]]]; next = nextset[[k]]; remove[[modj]] = next; If[modj == chunksize, done = True; posns = Apply[Alternatives, remove]; moddata = DeleteCases[moddata, posns]; nf = Nearest[moddata]; ]; , {j, 2, n}]] Out[1294]= {0.49, Null} Comparison: In[1336]:= Timing[result2 = findClosestUniqueC[data];] Out[1336]= {1.89, Null} In[1337]:= result === result2 Out[1337]= True Daniel Lichtblau Wolfram Research From mathgroup-adm at smc.vnet.net Thu Jul 21 03:56:23 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 010766BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 03:56:23 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L8uOpW001906; Thu, 21 Jul 2011 03:56:24 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id EFBF4FF008; Thu, 21 Jul 2011 03:56:23 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 7487DFF006; Thu, 21 Jul 2011 03:56:22 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06515 for mathgroup-newout; Thu, 21 Jul 2011 05:46:27 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06509 for mathgroup-newsend; Thu, 21 Jul 2011 05:46:27 -0400 (EDT) Date: Thu, 21 Jul 2011 05:46:27 -0400 (EDT) Message-Id: <201107210946.FAA06509 at smc.vnet.net> From: "Hobbs, Sylvia (DPH)" <sylvia.hobbs at state.ma.us> Subject: [mg120389] mlink SASImport To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.84514 After importing a huge SAS data set into Mathematica that contains 400 data elements, is there a global validation command where Mathematica could return a report of on the blanks and content frequencies in all of the data fields or do you have to run separate queries for every single data element? Sylvia Hobbs From mathgroup-adm at smc.vnet.net Thu Jul 21 03:58:45 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 77D486BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 03:58:45 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L8wkDg002056; Thu, 21 Jul 2011 03:58:46 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id C0FBDA819A; Thu, 21 Jul 2011 03:58:46 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 406D4A8195; Thu, 21 Jul 2011 03:58:45 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06536 for mathgroup-newout; Thu, 21 Jul 2011 05:47:00 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06531 for mathgroup-newsend; Thu, 21 Jul 2011 05:46:59 -0400 (EDT) Date: Thu, 21 Jul 2011 05:46:59 -0400 (EDT) Message-Id: <201107210946.FAA06531 at smc.vnet.net> From: Helen Read <readhpr at gmail.com> Subject: [mg120392] Re: Total plot width References: <j06b2e$nkk$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.84514 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On 7/20/2011 6:35 AM, carlos at colorado.edu wrote: > How can I specify the total plot width in Mathematica? I was looking for > something like AbsolutePlotWidth->250 (points implied) but havent found > that option in the documentation. There is AspectRatio, but that is > not a dimension. Thanks. > I suspect you will get many replies to this. The option you want is ImageSize -- Helen Read University of Vermont From mathgroup-adm at smc.vnet.net Thu Jul 21 04:00:22 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 67FB16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:00:22 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L90NgH002292; Thu, 21 Jul 2011 04:00:23 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id ADE43FF004; Thu, 21 Jul 2011 04:00:23 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id F0197FF006; Thu, 21 Jul 2011 04:00:21 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06575 for mathgroup-newout; Thu, 21 Jul 2011 05:47:55 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06570 for mathgroup-newsend; Thu, 21 Jul 2011 05:47:54 -0400 (EDT) Date: Thu, 21 Jul 2011 05:47:54 -0400 (EDT) Message-Id: <201107210947.FAA06570 at smc.vnet.net> From: dimitris <dimmechan at yahoo.com> Subject: [mg120397] unable to save notebook To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.84514 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Hello to all. When my student tries to save a document (e.g. hh its name) the following message appears... "Mathematica could not find enough disk space to save the file C:\Users \=D7\[Rho]=DE\[Sigma]\[Tau]\[Omicron]\[FinalSigma]\Downloads\hh.nb. The file was left unchanged. The disk is full, or if you are using a file server you may have reached your disk space quota." Any ideas on how to solve the problem? Thank you very much in advance for your replies. From mathgroup-adm at smc.vnet.net Thu Jul 21 04:02:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9AED06BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:02:41 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L92b9F002815; Thu, 21 Jul 2011 04:02:42 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id C07ADA81AA; Thu, 21 Jul 2011 04:02:37 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E5C67A8110; Thu, 21 Jul 2011 04:02:34 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06439 for mathgroup-newout; Thu, 21 Jul 2011 05:44:50 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06434 for mathgroup-newsend; Thu, 21 Jul 2011 05:44:50 -0400 (EDT) Date: Thu, 21 Jul 2011 05:44:50 -0400 (EDT) Message-Id: <201107210944.FAA06434 at smc.vnet.net> From: "Gabriel T. Landi" <gtlandi at gmail.com> Subject: [mg120380] Re: Total plot width References: <201107201032.GAA24081 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.84814 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You can use ImageSize-> {{left, right},{bottom,top}}. Check out ImageSize page for more details. Cheers Gabriel On 20/07/2011, at 07:32, carlos at colorado.edu wrote: > How can I specify the total plot width in Mathematica? I was looking for > something like AbsolutePlotWidth->250 (points implied) but havent found > that option in the documentation. There is AspectRatio, but that is > not a dimension. Thanks From mathgroup-adm at smc.vnet.net Thu Jul 21 04:04:32 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8510D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:04:32 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L94UKU002937; Thu, 21 Jul 2011 04:04:33 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id D4A91A8190; Thu, 21 Jul 2011 04:04:33 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 2C742BF4B9; Thu, 21 Jul 2011 04:04:32 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06530 for mathgroup-newout; Thu, 21 Jul 2011 05:46:49 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06524 for mathgroup-newsend; Thu, 21 Jul 2011 05:46:48 -0400 (EDT) Date: Thu, 21 Jul 2011 05:46:48 -0400 (EDT) Message-Id: <201107210946.FAA06524 at smc.vnet.net> From: Jay Bee <jiri.bocan at gmail.com> Subject: [mg120391] Re: Total plot width References: <j06b2e$nkk$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.85415 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 20, 11:35 am, car... at colorado.edu wrote: > How can I specify the total plot width in Mathematica? I was looking for > something like AbsolutePlotWidth->250 (points implied) but havent found > that option in the documentation. There is AspectRatio, but that is > not a dimension. Thanks. Hard to say, what do you mean exactly; do you mean Plot[] or Listplot[], or something of higher dimension? Resulting plot-width is influenced by AspectRatio, PlotRange, ImageSize, ... From mathgroup-adm at smc.vnet.net Thu Jul 21 04:06:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 66D9D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:06:19 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L96K9P003192; Thu, 21 Jul 2011 04:06:20 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 05C90BF4B9; Thu, 21 Jul 2011 04:06:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 75A54A8169; Thu, 21 Jul 2011 04:06:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06523 for mathgroup-newout; Thu, 21 Jul 2011 05:46:38 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06518 for mathgroup-newsend; Thu, 21 Jul 2011 05:46:38 -0400 (EDT) Date: Thu, 21 Jul 2011 05:46:38 -0400 (EDT) Message-Id: <201107210946.FAA06518 at smc.vnet.net> From: Alexei Boulbitch <Alexei.Boulbitch at iee.lu> Subject: [mg120390] Re: Total plot width To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.85415 The option: PlotRange->{Width, Height} should help. Try various cases specifying the Width say, 250 or whatever you need, and the Height that may be either a fixed number or Automatic. Have fun. Alexei How can I specify the total plot width in Mathematica? I was looking for something like AbsolutePlotWidth->250 (points implied) but havent found that option in the documentation. There is AspectRatio, but that is not a dimension. Thanks. Alexei BOULBITCH, Dr., habil. IEE S.A. ZAE Weiergewan, 11, rue Edmond Reuter, L-5326 Contern, LUXEMBOURG Office phone: +352-2454-2566 Office fax: +352-2454-3566 mobile phone: +49 151 52 40 66 44 From mathgroup-adm at smc.vnet.net Thu Jul 21 04:08:37 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 0306F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:08:37 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L98XPD003342; Thu, 21 Jul 2011 04:08:38 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id ECC11A8169; Thu, 21 Jul 2011 04:08:32 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 23781A8110; Thu, 21 Jul 2011 04:08:31 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06480 for mathgroup-newout; Thu, 21 Jul 2011 05:45:34 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06475 for mathgroup-newsend; Thu, 21 Jul 2011 05:45:33 -0400 (EDT) Date: Thu, 21 Jul 2011 05:45:33 -0400 (EDT) Message-Id: <201107210945.FAA06475 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120384] FinancialData still broken Reply-To: drmajorbob at yahoo.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.85715 Erroneous prices are randomly returned: FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} {8.81, 72.4, 14., 10.64, 46.49, 12.48, 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, 5.03241*10^8, 11.04, 31.44, 32.47} FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} Bobby -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Thu Jul 21 04:10:22 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 037EA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:10:22 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9AN67003555; Thu, 21 Jul 2011 04:10:23 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 1D859BF4B9; Thu, 21 Jul 2011 04:10:23 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 59B60BF4B8; Thu, 21 Jul 2011 04:10:21 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06502 for mathgroup-newout; Thu, 21 Jul 2011 05:46:06 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06497 for mathgroup-newsend; Thu, 21 Jul 2011 05:46:05 -0400 (EDT) Date: Thu, 21 Jul 2011 05:46:05 -0400 (EDT) Message-Id: <201107210946.FAA06497 at smc.vnet.net> From: dr DanW <dmaxwarren at gmail.com> Subject: [mg120387] Warning: OS X Lion and compilation Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.85715 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_600_699 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __PHISH_SPEAR_SUBJECT 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I have not dug thoroughly into this yet, but I wanted to get the warning out quickly. Apparently, OS X Lion does not include the gcc compiler. I upgraded to Lion this morning, then on a lark tried to compile a function in Mathematica with CompilationTarget -> "C". I got an error that no compiler was found. I am sure that it is only a matter of either obtaining a copy of gcc or Xcode (with its own c compiler, not gcc) and configuring Mathematica to use that compiler. I have not tried either, since I am not using anything but opcode compilation. If you are successful, please post instructions for others on this group. Thanks, Daniel From mathgroup-adm at smc.vnet.net Thu Jul 21 04:12:27 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 087856BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:12:27 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9CS0Z003690; Thu, 21 Jul 2011 04:12:28 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 0C282FF006; Thu, 21 Jul 2011 04:12:28 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 7277AA8190; Thu, 21 Jul 2011 04:12:26 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06554 for mathgroup-newout; Thu, 21 Jul 2011 05:47:22 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06549 for mathgroup-newsend; Thu, 21 Jul 2011 05:47:21 -0400 (EDT) Date: Thu, 21 Jul 2011 05:47:21 -0400 (EDT) Message-Id: <201107210947.FAA06549 at smc.vnet.net> From: Murray Eisenberg <murray at math.umass.edu> Subject: [mg120394] Re: Total plot width Reply-To: murray at math.umass.edu References: <201107201032.GAA24081 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.90314 The option you want is ImageSize. On 7/20/11 6:32 AM, carlos at colorado.edu wrote: > How can I specify the total plot width in Mathematica? I was looking for > something like AbsolutePlotWidth->250 (points implied) but havent found > that option in the documentation. There is AspectRatio, but that is > not a dimension. Thanks. > -- Murray Eisenberg murray at math.umass.edu Mathematics & Statistics Dept. Lederle Graduate Research Tower phone 413 549-1020 (H) University of Massachusetts 413 545-2859 (W) 710 North Pleasant Street fax 413 545-1801 Amherst, MA 01003-9305 From mathgroup-adm at smc.vnet.net Thu Jul 21 04:14:15 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B62406BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:14:15 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9EH0g003848; Thu, 21 Jul 2011 04:14:17 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 04A8BA8169; Thu, 21 Jul 2011 04:14:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 1A343A8110; Thu, 21 Jul 2011 04:14:15 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06508 for mathgroup-newout; Thu, 21 Jul 2011 05:46:17 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06503 for mathgroup-newsend; Thu, 21 Jul 2011 05:46:16 -0400 (EDT) Date: Thu, 21 Jul 2011 05:46:16 -0400 (EDT) Message-Id: <201107210946.FAA06503 at smc.vnet.net> From: Gary Wardall <gwardall at gmail.com> Subject: [mg120388] Re: locator References: <201107121059.GAA22222 at smc.vnet.net> <ivjgt7$2g9$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.90314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1100_1199 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 13, 2:19 am, Heike Gramberg <heike.gramb... at gmail.com> wrote: > I'm not sure what it is what you're asking for, but if you want to use a locator to trace a curve you can do something like > > Module[{p = {0, 1}, temp}, > temp[t_] := Exp[- t]; > Row[{ > LocatorPane[Dynamic[p, (p[[2]] = temp[#[[1]]]; p[[1]] = #[[1]]) &], > Plot[temp[t], {t, 0, 5}, PlotRange -> {Automatic, {0, 1}}, > ImageSize -> 400], > {{0, 0}, {5, 1}}], > Dynamic[Grid[{{"Time:", p[[1]]}, {"Temp:", p[[2]]}}]]}]] > > Heike. > > On 12 Jul 2011, at 11:59, raga wrote: > > > hi, > > i created a front end in mathematica which provides the user the > > independence of providing the input to the code and my code plots the > > graph for variation of temperature with time for newtons law of > > cooling but can any body please help me out by telling how to use a > > locator to locate the individual points which shows the respective > > temperature on the graph Would the "Drawing Tools" under "Graphics" be of help. I find it useful when I want to locate the coordinates on Plots. Gary Wardall From mathgroup-adm at smc.vnet.net Thu Jul 21 04:16:14 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A973D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:16:14 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9GFN3004589; Thu, 21 Jul 2011 04:16:15 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 9A86BA8190; Thu, 21 Jul 2011 04:16:15 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B6DC3FF006; Thu, 21 Jul 2011 04:16:13 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06591 for mathgroup-newout; Thu, 21 Jul 2011 05:48:17 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06586 for mathgroup-newsend; Thu, 21 Jul 2011 05:48:16 -0400 (EDT) Date: Thu, 21 Jul 2011 05:48:16 -0400 (EDT) Message-Id: <201107210948.FAA06586 at smc.vnet.net> From: Ray Koopman <koopman at sfu.ca> Subject: [mg120399] Re: sorting a nested list of 4-tuples References: <j03o4c$a64$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.90314 On Jul 19, 4:00 am, Luis Valero <luis.val... at mac.com> wrote: > Dear Sirs, > > I want to sort a list of 4-tuples of real numbers, so that, the second 4-tuple has minimum distance to the first, the third, selected from the rest, ha minimum distance to the second, and so on. > > The distance is the euclidean distance, calculated with the first two elements of each 4-tuple. > > I have defined a function that work: > > orderedList[list_] := Module[{nearest}, > Flatten[ Nest[{ > Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, 2}]], #] &, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], > Delete[ #[[2]], Position[ #[[2]], nearest ] ] } &, { {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; > > but I need to improve the temporal efficiency > > Thank you This does the job nicely without Nearest. For your real data, change DistanceMatrix@xy to DistanceMatrix[list[[All,{1,2}]]]. n = 10 xy = Table[Random[Real],{n},{2}] ddx = 2 Max[dd = DistanceMatrix@xy]; Do[dd[[i,i]] = ddx,{i,n}]; ddx = Table[ddx,{n}]; NestList[(dd[[#]] = ddx; Ordering[dd[[All,#]],1][[1]])&, 1, n-1] 10 {{0.923827,0.822223}, {0.369167,0.352365}, {0.309981,0.792447}, {0.375829,0.953723}, {0.680294,0.594137}, {0.411011,0.098692}, {0.295584,0.0860474},{0.749339,0.927127}, {0.263566,0.0431098},{0.0684959,0.230974}} {1,8,5,2,6,7,9,10,3,4} From mathgroup-adm at smc.vnet.net Thu Jul 21 04:18:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3A5026BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:18:35 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9IaN0005733; Thu, 21 Jul 2011 04:18:36 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id F1598FF004; Thu, 21 Jul 2011 04:18:35 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id EDC91A8110; Thu, 21 Jul 2011 04:18:33 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06547 for mathgroup-newout; Thu, 21 Jul 2011 05:47:11 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06542 for mathgroup-newsend; Thu, 21 Jul 2011 05:47:10 -0400 (EDT) Date: Thu, 21 Jul 2011 05:47:10 -0400 (EDT) Message-Id: <201107210947.FAA06542 at smc.vnet.net> From: Gareth Edwards <gareth.edwards at cubicmotion.com> Subject: [mg120393] newbie Map, Dynamic, etc To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.91215 Hi, Still playing around with Mathematica as a newbie and wrestling with the 'different' way one has to think about things as opposed to other languages. I think (hopefully) that an informative example for me would be a solution (or at least some hints) to the following: Say I have an image sequence (mySequence_0000.jpg, etc.) I'd like to create a viewer with a slider that scrubs through the images. That I can do. What I'd also like is an array of points (just one point per image, and initialized to {0,0} say ), such that on each image I can move a locator around and thereby modify the corresponding stored point in the array. In other words, store the location of a point (as manipulated by me) against each image. My gut tells me that this is trivial to the average Mathematica user- the trouble is I remain well below average right now! Any help appreciated. Best, Gareth -- Dr. Gareth Edwards Director www.cubicmotion.com Mobile: +44 7813 534111 Office: +44 1925 606430 Fax: +44 161 884 0095 This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. It may not be disclosed, copied, forwarded, used or relied upon by any person other than the intended addressee. If you believe that you have received the e-mail and its attachment(s) in error, you must not take any action based on them, nor must you copy or show them to anyone. If you have received this email in error please notify postmaster at cubicmotion.com. From mathgroup-adm at smc.vnet.net Thu Jul 21 04:20:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 78ED66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:20:21 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9KM1q005909; Thu, 21 Jul 2011 04:20:22 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 8469CFF009; Thu, 21 Jul 2011 04:20:22 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 7FDE0FF006; Thu, 21 Jul 2011 04:20:20 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06488 for mathgroup-newout; Thu, 21 Jul 2011 05:45:44 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06483 for mathgroup-newsend; Thu, 21 Jul 2011 05:45:44 -0400 (EDT) Date: Thu, 21 Jul 2011 05:45:44 -0400 (EDT) Message-Id: <201107210945.FAA06483 at smc.vnet.net> From: Ray Koopman <koopman at sfu.ca> Subject: [mg120385] Re: sorting a nested list of 4-tuples References: <j03o4c$a64$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.91215 On Jul 19, 4:00 am, Luis Valero <luis.val... at mac.com> wrote: > Dear Sirs, > > I want to sort a list of 4-tuples of real numbers, so that, the second 4-tuple has minimum distance to the first, the third, selected from the rest, ha minimum distance to the second, and so on. > > The distance is the euclidean distance, calculated with the first two elements of each 4-tuple. > > I have defined a function that work: > > orderedList[list_] := Module[{nearest}, > Flatten[ Nest[{ > Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, 2}]], #] &, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], > Delete[ #[[2]], Position[ #[[2]], nearest ] ] } &, { {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; > > but I need to improve the temporal efficiency > > Thank you This is faster than the code in my previous post (in which the line 'Do[dd[[i,i]] = ddx,{i,n}];' should be deleted because it was left over from an earlier version and is no longer needed): n = Length[xy = {{0.9238265948180384, 0.8222225655013509}, {0.36916681632329446, 0.352365112953319}, {0.30998090503173714, 0.7924465475420762}, {0.3758287909737646, 0.9537228544636929}, {0.6802940452860295, 0.5941374424537628}, {0.41101146869486416, 0.09869197753233201}, {0.2955842108802197, 0.08604736979206176}, {0.7493387235460567, 0.9271268053705936}, {0.26356623115061834, 0.04310983468962257}, {0.06849589850565166, 0.23097371847465945}}] 10 dd = DistanceMatrix@xy; q = Range@n; NestList[(q = SparseArray[q,Automatic,#] /. SparseArray[_,_,_,x_] :> x[[3]]; q[[Ordering[dd[[#,q]],1][[1]]]])&, 1, n-1] {1,8,5,2,6,7,9,10,3,4} From mathgroup-adm at smc.vnet.net Thu Jul 21 04:22:28 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3236C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:22:28 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9MTDX006107; Thu, 21 Jul 2011 04:22:29 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 2A0CEA8169; Thu, 21 Jul 2011 04:22:29 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 3453AA8110; Thu, 21 Jul 2011 04:22:27 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06494 for mathgroup-newout; Thu, 21 Jul 2011 05:45:55 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06489 for mathgroup-newsend; Thu, 21 Jul 2011 05:45:54 -0400 (EDT) Date: Thu, 21 Jul 2011 05:45:54 -0400 (EDT) Message-Id: <201107210945.FAA06489 at smc.vnet.net> From: Gary Wardall <gwardall at gmail.com> Subject: [mg120386] Re: Inverse of Interpolating Function? References: <j06avh$nj8$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.91215 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1700_1799 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 20, 5:34=C2 am, gonzorascal <dj... at duke.edu> wrote: > Hello All, > > I am working with an Interpolating Function of an oscillating solution (time series) to a differential equation. I am trying to find the period and pulse width of the oscillation. To do this I would like to have an inverse of my function y[t] (so I would have t[y]). I realize this function would be multivalued (that's what I want to find the period). =C2 I am not having success using Mathematica's InverseFunction[] or Reduce[] commands. Does anyone have any experience or suggestions with this sort of thing (either finding Inverse Interpolating Functions or another method for period and pulse width)? Thank you. > > -GR gonzorascal, First make sure the function you wish to have an inverse function is a function that has an inverse function. A quick visual test is the Horizontal Test for Inverse Functions. If any horizontal line intersects the graph twice or more then the inverse is NOT an inverse function. Graph the function you wish to create an inverse function for. If it fails the horizontal test you may have ti restrict your function like is done in Trigonometry. If it passes try something like in my example. points = {{0, -1}, {1, 1}, {2, 3}, {3, 4}, {4, 6}, {5, 10}};=E2=80=A8ifun= Interpolation[points] Does the function pass the Horizontal Test? Plot[ifun[x], {x, 0, 5}] It does. Define: invifun[x_] := FindRoot[ifun[y] == x, {y, 0, 5}][[1]][[2]] Note that: ifun[invifun[4]] is 4. and invifun[ifun[3]] is 3. and look at the sketch. Plot[{invifun[x], ifun[x], x}, {x, 0, 5}, PlotRange -> {0, 5}, AspectRatio -> Automatic] We have an inverse function. I hope this will help. Good Luck Gary Wardall From mathgroup-adm at smc.vnet.net Thu Jul 21 04:24:00 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B38886BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:24:00 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9O2AG006232; Thu, 21 Jul 2011 04:24:02 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id EBFE8BF4B9; Thu, 21 Jul 2011 04:24:01 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 1EA77BF4B5; Thu, 21 Jul 2011 04:24:00 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06585 for mathgroup-newout; Thu, 21 Jul 2011 05:48:06 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06580 for mathgroup-newsend; Thu, 21 Jul 2011 05:48:05 -0400 (EDT) Date: Thu, 21 Jul 2011 05:48:05 -0400 (EDT) Message-Id: <201107210948.FAA06580 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120398] Re: sorting a nested list of 4-tuples Reply-To: drmajorbob at yahoo.com References: <201107191055.GAA10229 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.91515 Sseziwa, The OP wanted distances to take into account only the 1st two elements of each vector, not all four, so your orderings usually won't match those of the original code. A simple modification works well, however. I call it "treat" below, but it's still your code, mostly. valero[list_] := Module[{nearest}, Flatten[Nest[{Append[#[[1]], nearest = Flatten @@ Nearest[Map[Rule[#[[{1, 2}]], #] &, #[[2]]], Last[#[[1]]][[{1, 2}]], 1]], Delete[#[[2]], Position[#[[2]], nearest]]} &, {{list[[1]]}, Delete[list, 1]}, Length[list] - 2], 1]]; sseziwa[list_] := Module[{first = First[list], rest = Rest[list], nearest, result}, result = {first}; Do[nearest = Nearest[rest -> Automatic, Last[result]]; result = Join[result, rest[[nearest]]]; rest = Drop[rest, nearest], {Length[rest]}]; result] treat[list_] := Module[{first = First@list, rest = Rest@list, nearest, result}, result = {first}; Do[nearest = Nearest[rest[[All, ;; 2]] -> Automatic, result[[-1, ;; 2]], 1]; result = Join[result, rest[[nearest]]]; rest = Drop[rest, nearest], {Length[rest]}]; result] Here is Daniel Lichtblau's code, but I may have broken it somehow. It sometimes agrees with Valero's code and sometimes does not. daniel[data_List] := Module[{n = Length@data, chunksize, denom = 1000., moddata, nf, next, taken, result, remove, nextset, posns, k}, chunksize = Ceiling[Log[n]]^2; moddata = Map[Take[#, 3] &, MapThread[Prepend, {data, Range[n]/denom}]]; nf = Nearest[moddata]; next = moddata[[1]]; taken = ConstantArray[False, n]; result = ConstantArray[{0., 0., 0., 0.}, n]; remove = ConstantArray[{0., 0., 0.}, chunksize]; result[[1]] = data[[1]]; remove[[1]] = moddata[[1]]; taken[[1]] = True; Do[nextset = nf[next, 1 + Mod[j, chunksize, 1]]; posns = Round[denom*Map[First, nextset]]; k = 1; While[k < Length[nextset] && taken[[posns[[k]]]], k++;]; taken[[posns[[k]]]] = True; result[[j]] = data[[posns[[k]]]]; next = nextset[[k]]; remove[[Mod[j, chunksize, 1]]] = next; If[Mod[j, chunksize] == 0, done = True; posns = Apply[Alternatives, remove]; moddata = DeleteCases[moddata, posns]; nf = Nearest[moddata];], {j, 2, n}]; result ] n = 10^2; data = RandomReal[1, {n, 4}]; Timing[one = valero@data;] Timing[two = sseziwa@data;] Timing[three = treat@data;] Timing[four = daniel@data;] {one == two, one == three, one == four} {0.025656, Null} {0.004861, Null} {0.005198, Null} {0.007332, Null} {False, True, False} <----- Daniel's and Sseziwa's code disagreed. n = 10^2; data = RandomReal[{-100, 100}, {n, 4}]; Timing[one = valero@data;] Timing[two = sseziwa@data;] Timing[three = treat@data;] Timing[four = daniel@data;] {one == two, one == three, one == four} {0.02548, Null} {0.004597, Null} {0.005269, Null} {0.007438, Null} {False, True, True} <------ Daniel's code agreed. n = 10^3; data = RandomReal[{-100, 100}, {n, 4}]; Timing[one = valero@data;] Timing[two = sseziwa@data;] Timing[three = treat@data;] Timing[four = daniel@data;] {one == two, one == three, one == four} {2.26575, Null} {0.357105, Null} {0.404373, Null} {0.150693, Null} {False, True, False} <------ Daniel's code disagreed, again. n = 10^4; data = RandomReal[{-100, 100}, {n, 4}]; Timing[one = valero@data;] Timing[two = sseziwa@data;] Timing[three = treat@data;] Timing[four = daniel@data;] {one == two, one == three, one == four} {254.635, Null} {41.0605, Null} {43.1114, Null} {3.94189, Null} {False, True, False} <------ Again. Daniel's code is faster, and it scales better. But there may be a discrepancy in the ordering. It usually agrees with "valero" and "treat" for small data sets, but not for larger ones. Bobby On Wed, 20 Jul 2011 05:34:56 -0500, Sseziwa Mukasa <mukasa at gmail.com> wrote: > Your function does not appear to work correctly, sometimes the list is > in the wrong order, but orderedList2: > > orderedList2[list_] := > Module[{first = First[list], rest = Rest[list], nearest, result}, > > result = {first}; > Do[nearest = Nearest[rest -> Automatic, Last[result]]; > result = Join[result, rest[[nearest]]]; > rest = Drop[rest, nearest], {Length[rest]}]; result] > > seems faster anyway.: > > In[11]:= Module[{list = RandomReal[{0, 1}, {20, 4}], result1, > result2}, > result1 = Timing[orderedList[list]]; > result2 = Timing[orderedList2[list]]; {result1[[2]] == > result2[[2]], > result1[[1]], result2[[1]], {list, result1[[2]], result2[[2]]}}] > Out[11]= {False, 0.002556, 0.0007, {{{0.0780386, 0.220901, 0.748457, > 0.548342}, {0.722099, 0.308747, 0.33661, 0.304516}, {0.623358, > 0.761312, > 0.884318, 0.21337}, {0.14872, 0.284139, 0.244084, 0.582692}, > {0.0829757, > 0.911987, 0.448848, 0.606659}, {0.312903, 0.703568, 0.747021, > 0.126831}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.189339, > 0.419192, 0.498754, 0.846607}, {0.661185, 0.455712, 0.31286, > 0.387921}, {0.566059, 0.331815, 0.412978, 0.84236}, {0.714704, > 0.335434, > 0.417758, 0.0569088}, {0.855757, 0.0118403, 0.310144, > 0.312894}, {0.278001, 0.874878, 0.289541, 0.199531}, {0.682503, > 0.387263, > 0.931379, 0.662633}, {0.8045, 0.264645, 0.595204, 0.534895}, > {0.645246, > 0.915467, 0.167849, 0.210847}, {0.789694, 0.987745, 0.0405679, > 0.0957831}, {0.811736, 0.77314, 0.73452, 0.0771508}, {0.784869, > 0.582503, > 0.0986897, 0.152786}, {0.426251, 0.135863, 0.465908, > 0.228462}}, {{0.0780386, 0.220901, 0.748457, 0.548342}, {0.14872, > 0.284139, 0.244084, 0.582692}, {0.189339, 0.419192, 0.498754, > 0.846607}, {0.312903, 0.703568, 0.747021, 0.126831}, {0.278001, > 0.874878, > 0.289541, 0.199531}, {0.0829757, 0.911987, 0.448848, 0.606659}, > {0.623358, > 0.761312, 0.884318, 0.21337}, {0.645246, 0.915467, 0.167849, > 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.811736, > 0.77314, > 0.73452, 0.0771508}, {0.784869, 0.582503, 0.0986897, > 0.152786}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.714704, > 0.335434, 0.417758, 0.0569088}, {0.722099, 0.308747, 0.33661, > 0.304516}, {0.682503, 0.387263, 0.931379, 0.662633}, {0.661185, > 0.455712, > 0.31286, 0.387921}, {0.566059, 0.331815, 0.412978, 0.84236}, > {0.426251, > 0.135863, 0.465908, 0.228462}, {0.8045, 0.264645, 0.595204, > 0.534895}, {0.855757, 0.0118403, 0.310144, 0.312894}}, {{0.0780386, > 0.220901, 0.748457, 0.548342}, {0.189339, 0.419192, 0.498754, > 0.846607}, {0.14872, 0.284139, 0.244084, 0.582692}, {0.566059, > 0.331815, > 0.412978, 0.84236}, {0.8045, 0.264645, 0.595204, 0.534895}, > {0.722099, > 0.308747, 0.33661, 0.304516}, {0.661185, 0.455712, 0.31286, > 0.387921}, {0.784869, 0.582503, 0.0986897, 0.152786}, {0.847102, > 0.437041, > 0.0924343, 0.0333101}, {0.714704, 0.335434, 0.417758, > 0.0569088}, {0.426251, 0.135863, 0.465908, 0.228462}, {0.855757, > 0.0118403, 0.310144, 0.312894}, {0.682503, 0.387263, 0.931379, > 0.662633}, {0.623358, 0.761312, 0.884318, 0.21337}, {0.811736, > 0.77314, > 0.73452, 0.0771508}, {0.312903, 0.703568, 0.747021, 0.126831}, > {0.278001, > 0.874878, 0.289541, 0.199531}, {0.645246, 0.915467, 0.167849, > 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.0829757, > 0.911987, 0.448848, 0.606659}}}} > > From the above output it seems to me orderedList is incorrect: > > In[12]:= Nearest[{{0.7220990188851284`, 0.30874655560999353`, > 0.33661039115480085`, > 0.30451607189733565`}, {0.623358140247426`, 0.7613121754790066`, > 0.8843184964161348`, 0.21336965042896106`}, {0.14871956929750207`, > 0.2841388256243189`, 0.2440839157054575`, > 0.5826918077236027`}, {0.08297574175354927`, 0.9119868514832306`, > 0.44884815651517496`, 0.606658888854545`}, {0.3129032093692543`, > 0.7035682306379043`, 0.7470209852828422`, > 0.126831036636313`}, {0.8471019825138335`, 0.4370412344560497`, > 0.09243429503478429`, 0.03331005052172231`}, {0.18933936353633118`, > 0.4191916563275504`, 0.49875370996337387`, > 0.8466068811542358`}, {0.6611848899498884`, 0.455712283905654`, > 0.31286031890780386`, 0.3879208331484807`}, {0.566058771065481`, > 0.3318146887998126`, 0.41297814980274516`, > 0.8423595336937795`}, {0.7147038318708883`, 0.33543423510640613`, > 0.4177577945972242`, 0.056908774958363884`}, {0.8557567595586966`, > 0.011840287587700837`, 0.31014365477384986`, > 0.31289360223925855`}, {0.27800072513915963`, 0.8748776068932764`, > 0.28954067774830894`, 0.19953109481447573`}, {0.6825027823624006`, > 0.38726329607605536`, 0.9313788703031116`, > 0.6626327289353637`}, {0.8045002220254145`, 0.26464489073341646`, > 0.5952036781362782`, 0.5348945499518614`}, {0.6452463375631783`, > 0.9154672494486176`, 0.16784916226023205`, > 0.21084656084695386`}, {0.7896939168446158`, 0.9877454808787693`, > 0.04056790678073363`, 0.09578312387470667`}, {0.8117363160995603`, > 0.7731396349254072`, 0.7345204475002354`, > 0.0771508252866615`}, {0.784869093354617`, 0.5825033331936824`, > 0.09868967226141323`, 0.1527856209885663`}, {0.426250694413443`, > 0.1358634032399666`, 0.46590788139431916`, > 0.22846239863279472`}}, {0.07803858379747108`, 0.22090093831902768`, > 0.7484574646075761`, 0.5483416965515358`}] > Out[12]= {{0.189339, 0.419192, 0.498754, 0.846607}} > > Regards, > Ssezi > > On Jul 19, 2011, at 6:55 AM, Luis Valero wrote: > >> Dear Sirs, >> >> I want to sort a list of 4-tuples of real numbers, so that, the second >> 4-tuple has minimum distance to the first, the third, selected from the >> rest, ha minimum distance to the second, and so on. >> >> The distance is the euclidean distance, calculated with the first two >> elements of each 4-tuple. >> >> I have defined a function that work: >> >> orderedList[list_] := Module[{nearest}, >> Flatten[ Nest[{ >> Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, >> 2}]], #] &, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], >> Delete[ #[[2]], Position[ #[[2]], nearest ] ] } &, { >> {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; >> >> >> but I need to improve the temporal efficiency >> >> Thank you >> >> >> > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Thu Jul 21 04:24:24 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4C9C96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:24:24 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9OPKJ006269; Thu, 21 Jul 2011 04:24:25 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 91925A81BA; Thu, 21 Jul 2011 04:24:25 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 627D0A81AA; Thu, 21 Jul 2011 04:24:23 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06569 for mathgroup-newout; Thu, 21 Jul 2011 05:47:44 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA06564 for mathgroup-newsend; Thu, 21 Jul 2011 05:47:43 -0400 (EDT) Date: Thu, 21 Jul 2011 05:47:43 -0400 (EDT) Message-Id: <201107210947.FAA06564 at smc.vnet.net> From: Sseziwa Mukasa <mukasa at gmail.com> Subject: [mg120396] Re: sorting a nested list of 4-tuples References: <201107191055.GAA10229 at smc.vnet.net> <1C3C0ED1-39D7-4232-9160-A26C586F61AB at gmail.com> <54C85D0B-AEE1-48E2-B9D9-857C56E1111F at mac.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.91515 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __RUS_OBFU_PHONE 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 20, 2011, at 6:33 AM, Luis Valero wrote: > Thank you very much for your time > > The function Nearest does not use only the two first elements of each 4-tuple. This is the reason for the two different results Sorry, I missed that part in your first post, but it's easy to modify my example to handle that case: orderedList2[list_] := Module[{first = First[list], rest = Rest[list], nearest, result}, result = {first}; Do[nearest = Nearest[rest[[All, ;; 2]] -> Automatic, Last[result][[;; 2]]]; result = Join[result, rest[[nearest]]]; rest = Drop[rest, nearest], {Length[rest]}]; result] In[5]:= Module[{list = RandomReal[{0, 1}, {1000, 4}], result1, result2}, result1 = Timing[orderedList[list]]; result2 = Timing[orderedList2[list]]; {result1[[2]] == result2[[2]], result1[[1]], result2[[1]]}] Out[5]= {True, 4.07419, 0.644008} So it still seems an order of magnitude faster. Daniel Lichtblau's solution is faster still, but doesn't agree on the ordering: orderedList3[data_] := Module[{n = Length[data], chunksize, denom, moddata, nf, next, taken, result, remove, nextset, posns, k, done}, chunksize = Ceiling[Log[n]]^2; denom = 10000.; moddata = Map[Take[#, 3] &, MapThread[Prepend, {data, Range[n]/denom}]]; nf = Nearest[moddata]; next = moddata[[1]]; taken = ConstantArray[False, n]; result = ConstantArray[{0., 0., 0., 0.}, n]; remove = ConstantArray[{0., 0., 0.}, chunksize]; result[[1]] = data[[1]]; remove[[1]] = moddata[[1]]; taken[[1]] = True; Do[nextset = nf[next, 1 + Mod[j, chunksize, 1]]; posns = Round[denom*Map[First, nextset]]; k = 1; While[k < Length[nextset] && taken[[posns[[k]]]], k++;]; taken[[posns[[k]]]] = True; result[[j]] = data[[posns[[k]]]]; next = nextset[[k]]; remove[[Mod[j, chunksize, 1]]] = next; If[Mod[j, chunksize] == 0, done = True; posns = Apply[Alternatives, remove]; moddata = DeleteCases[moddata, posns]; nf = Nearest[moddata];];, {j, 2, n}]; result] In[9]:= Module[{list = RandomReal[{0, 1}, {1000, 4}], result1, result2, result3}, result1 = Timing[orderedList[list]]; result2 = Timing[orderedList2[list]]; result3 = Timing[orderedList3[list]]; {result1[[2]] == result2[[2]], result1[[2]] === result3[[2]], result1[[1]], result2[[1]], result3[[1]]}] Out[9]= {True, False, 4.24234, 0.664731, 0.20674} > > Regards > > Luis > > > El 19/07/2011, a las 18:05, Sseziwa Mukasa escribi=F3: > >> Your function does not appear to work correctly, sometimes the list is in the wrong order, but orderedList2: >> >> orderedList2[list_] := >> Module[{first = First[list], rest = Rest[list], nearest, result}, >> result = {first}; >> Do[nearest = Nearest[rest -> Automatic, Last[result]]; >> result = Join[result, rest[[nearest]]]; >> rest = Drop[rest, nearest], {Length[rest]}]; result] >> >> seems faster anyway.: >> >> In[11]:= Module[{list = RandomReal[{0, 1}, {20, 4}], result1, result2}, >> result1 = Timing[orderedList[list]]; >> result2 = Timing[orderedList2[list]]; {result1[[2]] == result2[[2]], >> result1[[1]], result2[[1]], {list, result1[[2]], result2[[2]]}}] >> Out[11]= {False, 0.002556, 0.0007, {{{0.0780386, 0.220901, 0.748457, >> 0.548342}, {0.722099, 0.308747, 0.33661, 0.304516}, {0.623358, 0.761312, >> 0.884318, 0.21337}, {0.14872, 0.284139, 0.244084, 0.582692}, {0.0829757, >> 0.911987, 0.448848, 0.606659}, {0.312903, 0.703568, 0.747021, >> 0.126831}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.189339, >> 0.419192, 0.498754, 0.846607}, {0.661185, 0.455712, 0.31286, >> 0.387921}, {0.566059, 0.331815, 0.412978, 0.84236}, {0.714704, 0.335434, >> 0.417758, 0.0569088}, {0.855757, 0.0118403, 0.310144, >> 0.312894}, {0.278001, 0.874878, 0.289541, 0.199531}, {0.682503, 0.387263, >> 0.931379, 0.662633}, {0.8045, 0.264645, 0.595204, 0.534895}, {0.645246, >> 0.915467, 0.167849, 0.210847}, {0.789694, 0.987745, 0.0405679, >> 0.0957831}, {0.811736, 0.77314, 0.73452, 0.0771508}, {0.784869, 0.582503, >> 0.0986897, 0.152786}, {0.426251, 0.135863, 0.465908, >> 0.228462}}, {{0.0780386, 0.220901, 0.748457, 0.548342}, {0.14872, >> 0.284139, 0.244084, 0.582692}, {0.189339, 0.419192, 0.498754, >> 0.846607}, {0.312903, 0.703568, 0.747021, 0.126831}, {0.278001, 0.874878, >> 0.289541, 0.199531}, {0.0829757, 0.911987, 0.448848, 0.606659}, {0.623358, >> 0.761312, 0.884318, 0.21337}, {0.645246, 0.915467, 0.167849, >> 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.811736, 0.77314, >> 0.73452, 0.0771508}, {0.784869, 0.582503, 0.0986897, >> 0.152786}, {0.847102, 0.437041, 0.0924343, 0.0333101}, {0.714704, >> 0.335434, 0.417758, 0.0569088}, {0.722099, 0.308747, 0.33661, >> 0.304516}, {0.682503, 0.387263, 0.931379, 0.662633}, {0.661185, 0.455712, >> 0.31286, 0.387921}, {0.566059, 0.331815, 0.412978, 0.84236}, {0.426251, >> 0.135863, 0.465908, 0.228462}, {0.8045, 0.264645, 0.595204, >> 0.534895}, {0.855757, 0.0118403, 0.310144, 0.312894}}, {{0.0780386, >> 0.220901, 0.748457, 0.548342}, {0.189339, 0.419192, 0.498754, >> 0.846607}, {0.14872, 0.284139, 0.244084, 0.582692}, {0.566059, 0.331815, >> 0.412978, 0.84236}, {0.8045, 0.264645, 0.595204, 0.534895}, {0.722099, >> 0.308747, 0.33661, 0.304516}, {0.661185, 0.455712, 0.31286, >> 0.387921}, {0.784869, 0.582503, 0.0986897, 0.152786}, {0.847102, 0.437041, >> 0.0924343, 0.0333101}, {0.714704, 0.335434, 0.417758, >> 0.0569088}, {0.426251, 0.135863, 0.465908, 0.228462}, {0.855757, >> 0.0118403, 0.310144, 0.312894}, {0.682503, 0.387263, 0.931379, >> 0.662633}, {0.623358, 0.761312, 0.884318, 0.21337}, {0.811736, 0.77314, >> 0.73452, 0.0771508}, {0.312903, 0.703568, 0.747021, 0.126831}, {0.278001, >> 0.874878, 0.289541, 0.199531}, {0.645246, 0.915467, 0.167849, >> 0.210847}, {0.789694, 0.987745, 0.0405679, 0.0957831}, {0.0829757, >> 0.911987, 0.448848, 0.606659}}}} >> >> From the above output it seems to me orderedList is incorrect: >> >> In[12]:= Nearest[{{0.7220990188851284`, 0.30874655560999353`, 0.33661039115480085`, >> 0.30451607189733565`}, {0.623358140247426`, 0.7613121754790066`, >> 0.8843184964161348`, 0.21336965042896106`}, {0.14871956929750207`, >> 0.2841388256243189`, 0.2440839157054575`, >> 0.5826918077236027`}, {0.08297574175354927`, 0.9119868514832306`, >> 0.44884815651517496`, 0.606658888854545`}, {0.3129032093692543`, >> 0.7035682306379043`, 0.7470209852828422`, >> 0.126831036636313`}, {0.8471019825138335`, 0.4370412344560497`, >> 0.09243429503478429`, 0.03331005052172231`}, {0.18933936353633118`, >> 0.4191916563275504`, 0.49875370996337387`, >> 0.8466068811542358`}, {0.6611848899498884`, 0.455712283905654`, >> 0.31286031890780386`, 0.3879208331484807`}, {0.566058771065481`, >> 0.3318146887998126`, 0.41297814980274516`, >> 0.8423595336937795`}, {0.7147038318708883`, 0.33543423510640613`, >> 0.4177577945972242`, 0.056908774958363884`}, {0.8557567595586966`, >> 0.011840287587700837`, 0.31014365477384986`, >> 0.31289360223925855`}, {0.27800072513915963`, 0.8748776068932764`, >> 0.28954067774830894`, 0.19953109481447573`}, {0.6825027823624006`, >> 0.38726329607605536`, 0.9313788703031116`, >> 0.6626327289353637`}, {0.8045002220254145`, 0.26464489073341646`, >> 0.5952036781362782`, 0.5348945499518614`}, {0.6452463375631783`, >> 0.9154672494486176`, 0.16784916226023205`, >> 0.21084656084695386`}, {0.7896939168446158`, 0.9877454808787693`, >> 0.04056790678073363`, 0.09578312387470667`}, {0.8117363160995603`, >> 0.7731396349254072`, 0.7345204475002354`, >> 0.0771508252866615`}, {0.784869093354617`, 0.5825033331936824`, >> 0.09868967226141323`, 0.1527856209885663`}, {0.426250694413443`, >> 0.1358634032399666`, 0.46590788139431916`, >> 0.22846239863279472`}}, {0.07803858379747108`, 0.22090093831902768`, >> 0.7484574646075761`, 0.5483416965515358`}] >> Out[12]= {{0.189339, 0.419192, 0.498754, 0.846607}} >> >> Regards, >> Ssezi >> >> On Jul 19, 2011, at 6:55 AM, Luis Valero wrote: >> >>> Dear Sirs, >>> >>> I want to sort a list of 4-tuples of real numbers, so that, the second 4-tuple has minimum distance to the first, the third, selected from the rest, ha minimum distance to the second, and so on. >>> >>> The distance is the euclidean distance, calculated with the first two elements of each 4-tuple. >>> >>> I have defined a function that work: >>> >>> orderedList[list_] := Module[{nearest}, >>> Flatten[ Nest[{ >>> Append[ #[[1]] , nearest = Flatten @@ Nearest[ Map[ Rule[ #[[{1, 2}]], #] &, #[[2]] ], Last[ #[[1]] ] [[{1, 2}]], 1] ], >>> Delete[ #[[2]], Position[ #[[2]], nearest ] ] } &, { {list[[1]] }, Delete[ list, 1 ] }, Length[ list ] - 2], 1] ]; >>> >>> >>> but I need to improve the temporal efficiency >>> >>> Thank you >>> >>> >>> >> > From mathgroup-adm at smc.vnet.net Thu Jul 21 04:59:28 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9B9056BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 04:59:28 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6L9xT1g010405; Thu, 21 Jul 2011 04:59:29 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id A75E6A8110; Thu, 21 Jul 2011 04:59:29 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 36C4CBF4B8; Thu, 21 Jul 2011 04:59:28 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08591 for mathgroup-newout; Thu, 21 Jul 2011 06:54:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08586 for mathgroup-newsend; Thu, 21 Jul 2011 06:54:12 -0400 (EDT) Date: Thu, 21 Jul 2011 06:54:12 -0400 (EDT) Message-Id: <201107211054.GAA08586 at smc.vnet.net> From: Jay Bee <jiri.bocan at gmail.com> Subject: [mg120400] Re: Inverse of Interpolating Function? References: <j06avh$nj8$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.95114 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_900_999 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 20, 11:34 am, gonzorascal <dj... at duke.edu> wrote: > Hello All, > > I am working with an Interpolating Function of an oscillating solution (time series) to a differential equation. I am trying to find the period and pulse width of the oscillation. To do this I would like to have an inverse of my function y[t] (so I would have t[y]). I realize this function would be multivalued (that's what I want to find the period). I am not having success using Mathematica's InverseFunction[] or Reduce[] commands. Does anyone have any experience or suggestions with this sort of thing (either finding Inverse Interpolating Functions or another method for period and pulse width)? Thank you. > > -GR So, when you will find out the period, compute sufficient number of points with the help of this interpolation function, e.g., as a Table[], change coordinates, and interpolate again... Of course, if you know exact formula, worth using it... From mathgroup-adm at smc.vnet.net Thu Jul 21 05:00:14 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 052C36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 05:00:14 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6LA0Fis010622; Thu, 21 Jul 2011 05:00:15 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 4928CA8190; Thu, 21 Jul 2011 05:00:15 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 82F10A8110; Thu, 21 Jul 2011 05:00:13 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08597 for mathgroup-newout; Thu, 21 Jul 2011 06:54:23 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08592 for mathgroup-newsend; Thu, 21 Jul 2011 06:54:22 -0400 (EDT) Date: Thu, 21 Jul 2011 06:54:22 -0400 (EDT) Message-Id: <201107211054.GAA08592 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120401] Re: Computable Document Format Replaces Player Notebooks Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.95114 On Thu, 21 Jul 2011 05:47:32 -0400 (EDT), Gregory Lypny wrote: > Hi Everyone, > > Probably a silly question but I just want to be sure: Has the computable > document format that is built into Mathematica replaced player notebooks, > so that I no longer have to upload my notebooks to Wolfram for= conversion? > > Regards, > > Gregory Correct. Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Thu Jul 21 05:02:41 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id F2DF16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 05:02:40 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6LA2gFu010970; Thu, 21 Jul 2011 05:02:42 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 54B5BFF008; Thu, 21 Jul 2011 05:02:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B6812FF004; Thu, 21 Jul 2011 05:02:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08612 for mathgroup-newout; Thu, 21 Jul 2011 06:54:34 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08607 for mathgroup-newsend; Thu, 21 Jul 2011 06:54:33 -0400 (EDT) Date: Thu, 21 Jul 2011 06:54:33 -0400 (EDT) Message-Id: <201107211054.GAA08607 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120402] Re: ExampleData[{"Geometry3D", "Torus"}] References: <201107210945.FAA06442 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.95414 On Thu, 21 Jul 2011, Joseph O'Rourke wrote: > Is it possible to control the radii of a torus in Mathematica 8 using the ExampleData[] function? I cannot see how to get anything but the default torus. Thanks! > > Hello Joseph, would this be of use Manipulate[ ParametricPlot3D[{ Cos[t] (r2 + r1 Cos[u]), Sin[t] (r2 + r1 Cos[u]), r1 Sin[u]}, {t, 0, 2 Pi}, {u, 0, 2 Pi}, Mesh -> None], {{r1, 1}, 0, 2}, {{r2, 3}, 0, 5}] Oliver From mathgroup-adm at smc.vnet.net Thu Jul 21 05:04:38 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 673D56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 05:04:38 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6LA4dNF011165; Thu, 21 Jul 2011 05:04:39 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 70B9BA8169; Thu, 21 Jul 2011 05:04:39 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D411BFF006; Thu, 21 Jul 2011 05:04:37 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08624 for mathgroup-newout; Thu, 21 Jul 2011 06:54:45 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA08618 for mathgroup-newsend; Thu, 21 Jul 2011 06:54:44 -0400 (EDT) Date: Thu, 21 Jul 2011 06:54:44 -0400 (EDT) Message-Id: <201107211054.GAA08618 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120403] Re: unable to save notebook References: <201107210947.FAA06570 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.95414 On Thu, 21 Jul 2011, dimitris wrote: > Hello to all. > When my student tries to save a document (e.g. hh its name) the > following message appears... > > "Mathematica could not find enough disk space to save the file C:\Users > \=D7\[Rho]=DE\[Sigma]\[Tau]\[Omicron]\[FinalSigma]\Downloads\hh.nb. The > file was left unchanged. The disk is full, or if you are using a file > server you may have reached your disk space quota." > > Any ideas on how to solve the problem? > > Thank you very much in advance for your replies. > > Dimitris, a wild guess: does saving to a path without any special characters work? Oliver From mathgroup-adm at smc.vnet.net Thu Jul 21 05:28:34 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 90E2E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 05:28:34 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6LASZi4015305; Thu, 21 Jul 2011 05:28:35 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 79739A8180; Thu, 21 Jul 2011 05:28:35 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D5A81A80ED; Thu, 21 Jul 2011 05:28:33 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA08991 for mathgroup-newout; Thu, 21 Jul 2011 07:23:56 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA08986 for mathgroup-newsend; Thu, 21 Jul 2011 07:23:55 -0400 (EDT) Date: Thu, 21 Jul 2011 07:23:55 -0400 (EDT) Message-Id: <201107211123.HAA08986 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120404] Re: Inverse of Interpolating Function? References: <201107210945.FAA06489 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.21.102118 On Thu, 21 Jul 2011, Gary Wardall wrote: > On Jul 20, 5:34=C2 am, gonzorascal <dj... at duke.edu> wrote: >> Hello All, >> >> I am working with an Interpolating Function of an oscillating solution (time series) to a differential equation. I am trying to find the period and pulse width of the oscillation. To do this I would like to have an inverse of my function y[t] (so I would have t[y]). I realize this function would be multivalued (that's what I want to find the period). =C2 I am not having success using Mathematica's InverseFunction[] or Reduce[] commands. Does anyone have any experience or suggestions with this sort of thing (either finding Inverse Interpolating Functions or another method for period and pulse width)? Thank you. >> >> -GR > > gonzorascal, > > First make sure the function you wish to have an inverse function is a > function that has an inverse function. A quick visual test is the > Horizontal Test for Inverse Functions. If any horizontal line > intersects the graph twice or more then the inverse is NOT an inverse > function. Graph the function you wish to create an inverse function > for. If it fails the horizontal test you may have ti restrict your > function like is done in Trigonometry. If it passes try something like > in my example. > > > points = {{0, -1}, {1, 1}, {2, 3}, {3, 4}, {4, 6}, {5, 10}};=E2=80=A8ifun= > Interpolation[points] > Does the function pass the Horizontal Test? > > Plot[ifun[x], {x, 0, 5}] > > It does. Define: > > invifun[x_] := FindRoot[ifun[y] == x, {y, 0, 5}][[1]][[2]] > > Note that: > > ifun[invifun[4]] > > is 4. > > and > > invifun[ifun[3]] > > is 3. > > and look at the sketch. > > Plot[{invifun[x], ifun[x], x}, {x, 0, 5}, PlotRange -> {0, 5}, > AspectRatio -> Automatic] > > We have an inverse function. > > I hope this will help. > > Good Luck > > Gary Wardall > > You could also use NDSolve for that - that advantage would be that it will generate an interpolation function init = x /. FindRoot[ifun[x] == 0, {x, 0, 1}] inf = t /. First[NDSolve[{t'[a] == 1/(ifun'[t[a]]), t[0] == init}, t, {a, 0, 5}]] Plot[{inf[x], ifun[x], x}, {x, 0, 5}, PlotRange -> {0, 5}, AspectRatio -> Automatic] Oliver From mathgroup-adm at smc.vnet.net Thu Jul 21 19:12:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 17E516BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:12:42 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0Cge1020062; Thu, 21 Jul 2011 19:12:42 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 35719A818A; Thu, 21 Jul 2011 19:12:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id A283FBF4B5; Thu, 21 Jul 2011 19:12:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16741 for mathgroup-newout; Thu, 21 Jul 2011 21:06:01 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16736 for mathgroup-newsend; Thu, 21 Jul 2011 21:06:00 -0400 (EDT) Date: Thu, 21 Jul 2011 21:06:00 -0400 (EDT) Message-Id: <201107220106.VAA16736 at smc.vnet.net> From: "Joseph O'Rourke" <orourke at scinix.smith.edu> Subject: [mg120406] Re: ExampleData[{"Geometry3D", "Torus"}] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.14 Thanks, Oliver. I know how to make a torus via ParametricPlot3D[], and by using the deprecated Torus[] function. I was wondering if ExampleData[] could be adjusted so that one would have the same control as with the old Torus[] function. The reason I wanted this is that the torus produced by ExampleData[] looks much nicer than that produced by Torus[]. Or, at least, I cannot get the latter to look as smooth when rendered as the former. But maybe I should just use ParametricPlot3D[] with Mehs->None as you suggest. Thanks again for your attention. From mathgroup-adm at smc.vnet.net Thu Jul 21 19:13:07 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B7A9A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:13:07 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0D95o020141; Thu, 21 Jul 2011 19:13:09 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 10E24BF4B5; Thu, 21 Jul 2011 19:13:09 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 53A56BF4B0; Thu, 21 Jul 2011 19:13:07 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16839 for mathgroup-newout; Thu, 21 Jul 2011 21:08:31 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16833 for mathgroup-newsend; Thu, 21 Jul 2011 21:08:30 -0400 (EDT) Date: Thu, 21 Jul 2011 21:08:30 -0400 (EDT) Message-Id: <201107220108.VAA16833 at smc.vnet.net> From: David Skulsky <edskulsky at gmail.com> Subject: [mg120420] Re: Warning: OS X Lion and compilation Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.14 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_100_199 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __PHISH_SPEAR_SUBJECT 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I just installed Xcode (which is now free in the App Store) and was able to compile using C as the compilation target. David From mathgroup-adm at smc.vnet.net Thu Jul 21 19:14:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 956956BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:14:59 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0F0PV020559; Thu, 21 Jul 2011 19:15:00 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id DA9C7A818A; Thu, 21 Jul 2011 19:15:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 5D7BAA8169; Thu, 21 Jul 2011 19:14:59 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16776 for mathgroup-newout; Thu, 21 Jul 2011 21:06:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16771 for mathgroup-newsend; Thu, 21 Jul 2011 21:06:54 -0400 (EDT) Date: Thu, 21 Jul 2011 21:06:54 -0400 (EDT) Message-Id: <201107220106.VAA16771 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120411] How Can I Eliminate Line Wrapping When Using the Row Function To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.315 Hello everyone, Sometimes when I use Row for four or five items, the result wraps over two lines. How can I force the result to be displayed on one line? I couldn't find an option for this in Documentation Centre. Gregory From mathgroup-adm at smc.vnet.net Thu Jul 21 19:16:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A4E666BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:16:40 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0GgrK021024; Thu, 21 Jul 2011 19:16:42 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 0544FA8180; Thu, 21 Jul 2011 19:16:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 765EFA8169; Thu, 21 Jul 2011 19:16:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16790 for mathgroup-newout; Thu, 21 Jul 2011 21:07:16 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16785 for mathgroup-newsend; Thu, 21 Jul 2011 21:07:15 -0400 (EDT) Date: Thu, 21 Jul 2011 21:07:15 -0400 (EDT) Message-Id: <201107220107.VAA16785 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120413] How Can I Include a Button in a Manipulate To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.315 Hello everyone, I have a Manipulate that generates a random integer or integers depending on the user's choice of parameters in a number of setter bars. I'd like to include a button in the Manipulate's output pane that allows the user to generate a new result by generating a new random number while keeping all of the parameters in the setter bar the same. Can that be done? Regards, Gregory From mathgroup-adm at smc.vnet.net Thu Jul 21 19:18:34 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2DB8C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:18:34 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0IZ0o029913; Thu, 21 Jul 2011 19:18:35 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 1D655BF4D2; Thu, 21 Jul 2011 19:18:35 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id BB344A8180; Thu, 21 Jul 2011 19:18:33 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16812 for mathgroup-newout; Thu, 21 Jul 2011 21:07:48 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16807 for mathgroup-newsend; Thu, 21 Jul 2011 21:07:47 -0400 (EDT) Date: Thu, 21 Jul 2011 21:07:47 -0400 (EDT) Message-Id: <201107220107.VAA16807 at smc.vnet.net> From: dr DanW <dmaxwarren at gmail.com> Subject: [mg120416] Re: Warning: OS X Lion and compilation Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.1214 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_300_399 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __PHISH_SPEAR_SUBJECT 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Ok, I won't call it a total false alarm. I had Xcode 4.0 installed prior to installing Lion, and the scenario I described in my previous posting occured. At that time, I also tried typing "gcc" in the Terminal and it was not found. I have now installed Xcode 4.2 (free from the App Store) and I am now able to compile functions in Mathematica. All is well. Daniel From mathgroup-adm at smc.vnet.net Thu Jul 21 19:20:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C04056BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:20:48 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0KoCV030616; Thu, 21 Jul 2011 19:20:50 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 0D22BBF4B9; Thu, 21 Jul 2011 19:20:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 52034BF4B8; Thu, 21 Jul 2011 19:20:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16802 for mathgroup-newout; Thu, 21 Jul 2011 21:07:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16797 for mathgroup-newsend; Thu, 21 Jul 2011 21:07:37 -0400 (EDT) Date: Thu, 21 Jul 2011 21:07:37 -0400 (EDT) Message-Id: <201107220107.VAA16797 at smc.vnet.net> From: Gilmar Rodriguez-pierluissi <peacenova at yahoo.com> Subject: [mg120415] Producing an image that only contains its interior and boundary but, no exterior. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.615 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_MEDIA_BODY 0, __CP_URI_IN_BODY 0, __FRAUD_MISC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. This is an old issue mentioned by the late Jens-Peer Kuska in: http://forums.wolfram.com/mathgroup/archive/2006/Mar/msg00037.html How can a user produce a graphic image that includes only its interior and boundary but, without the exterior. This would facilitate embedding an image within another without having to waste time having to eliminate the annoying edges. Thank you! Gilmar Rodriguez-Pierluissi From mathgroup-adm at smc.vnet.net Thu Jul 21 19:23:05 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2CA856BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:23:05 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0N6Si005250; Thu, 21 Jul 2011 19:23:06 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id F25CDA8190; Thu, 21 Jul 2011 19:23:05 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 545BAA818A; Thu, 21 Jul 2011 19:23:04 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16859 for mathgroup-newout; Thu, 21 Jul 2011 21:09:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16854 for mathgroup-newsend; Thu, 21 Jul 2011 21:09:03 -0400 (EDT) Date: Thu, 21 Jul 2011 21:09:03 -0400 (EDT) Message-Id: <201107220109.VAA16854 at smc.vnet.net> From: "DaleJenk" <dale.jenkins8 at deletegooglemail.com> Subject: [mg120423] mandelbrot in version 7 & Ruskeepaa version 3 To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.1214 I bought Mathematica 7 Home Edition last year. I'm trying to plot the Mandelbrot Set following the instructions in Ruskeepaa's Mathematica Navigator version 3. I'm getting an error message. Here's what I am introducing: mandelbrot = Compile[{{c,_Complex}}, Module[{z=0+0I, n=0}, While[Abs[z]<2 && n<50, z=z^2+c; n++]; n]]; DensityPlot[mandelbrot[x+Iy], {x,-2,1},{y,-1.5,1.5}, PlotPoints->200, Mesh->False, FrameTicks->{{-2,-1,0,1},{-1,0,1}}]; //Timing I get the message: CompiledFunction::cfsa: Argument -1.99998 + Iy at position 1 should be a machine-size complex number. Where am I going wrong? Thanks. From mathgroup-adm at smc.vnet.net Thu Jul 21 19:24:32 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C7FA86BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:24:32 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0OYcd011681; Thu, 21 Jul 2011 19:24:34 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 273A9BF4B5; Thu, 21 Jul 2011 19:24:34 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id A6981BF47E; Thu, 21 Jul 2011 19:24:32 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16769 for mathgroup-newout; Thu, 21 Jul 2011 21:06:44 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16764 for mathgroup-newsend; Thu, 21 Jul 2011 21:06:43 -0400 (EDT) Date: Thu, 21 Jul 2011 21:06:43 -0400 (EDT) Message-Id: <201107220106.VAA16764 at smc.vnet.net> From: David Reiss <dbreiss at gmail.com> Subject: [mg120410] Re: Imported Data in Mathematica Player or CDF Documents References: <j06bes$nof$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.1514 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_700_799 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. One approach is to place the data into a variable and then use the SaveDefinitions->True option for Manipulate. Then when that Manipulate is placed in a CDF it will have the data embedded. Best, David On Jul 20, 6:42 am, Gregory Lypny <gregory.ly... at videotron.ca> wrote: > Hello everyone, > > I'm in the process of creating a set of Mathematica Player documents > for my students, and for many of them, I need to import data from text > files. When I convert the notebooks to CDF, is the imported data > cached? Can I simply leave the Import function in the player document? > Or do I have to copy and paste the data manually into a variable? > > Any advice would be much appreciated, > > Gregory From mathgroup-adm at smc.vnet.net Thu Jul 21 19:26:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2097C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:26:35 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0QVwY012938; Thu, 21 Jul 2011 19:26:31 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 7F8FCA81C1; Thu, 21 Jul 2011 19:26:30 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id ECA34A81BD; Thu, 21 Jul 2011 19:26:28 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16818 for mathgroup-newout; Thu, 21 Jul 2011 21:07:59 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16813 for mathgroup-newsend; Thu, 21 Jul 2011 21:07:58 -0400 (EDT) Date: Thu, 21 Jul 2011 21:07:58 -0400 (EDT) Message-Id: <201107220107.VAA16813 at smc.vnet.net> From: George Woodrow III <georgevw3 at mac.com> Subject: [mg120417] Re: Warning: OS X Lion and compilation References: <201107210946.FAA06497 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.1514 The good news is that Xcode is now free. george On Jul 21, 2011, at 5:46 AM, dr DanW wrote: > I have not dug thoroughly into this yet, but I wanted to get the warning out quickly. Apparently, OS X Lion does not include the gcc compiler. I upgraded to Lion this morning, then on a lark tried to compile a function in Mathematica with CompilationTarget -> "C". I got an error that no compiler was found. > > I am sure that it is only a matter of either obtaining a copy of gcc or Xcode (with its own c compiler, not gcc) and configuring Mathematica to use that compiler. I have not tried either, since I am not using anything but opcode compilation. If you are successful, please post instructions for others on this group. > > Thanks, > Daniel > From mathgroup-adm at smc.vnet.net Thu Jul 21 19:28:18 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8890B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:28:18 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0SJ7h013192; Thu, 21 Jul 2011 19:28:19 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id C8D74A8190; Thu, 21 Jul 2011 19:28:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 61F54BF4B9; Thu, 21 Jul 2011 19:28:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16796 for mathgroup-newout; Thu, 21 Jul 2011 21:07:27 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16791 for mathgroup-newsend; Thu, 21 Jul 2011 21:07:26 -0400 (EDT) Date: Thu, 21 Jul 2011 21:07:26 -0400 (EDT) Message-Id: <201107220107.VAA16791 at smc.vnet.net> From: paulvonhippel at yahoo <paulvonhippel at yahoo.com> Subject: [mg120414] TransformedDistribution, for a sum of M iid variables To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.1514 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, FROM_NAME_PHRASE 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Using the TransformedDistribution function it is easy to show that the sum of two normal variables is normal, e.g., Input: TransformedDistribution[Z1+Z2,{Z1\ [Distributed]NormalDistribution[0,1],Z2\ [Distributed]NormalDistribution[0,1]}] Output: NormalDistribution[0, Sqrt[2]] Likewise it wouldn't be hard to show that the sum of 3 normal variables is normal, or 4. But how do I show that the sum of M normal variables is normal, where M is an arbitrary positive integer. I'm thinking I should use the Sum function inside TransformedDistribution, but I don't know how the notation would work. I see that there's a UniformSumDistribution function, but that's limited to uniform variables. Later I will want to do similar calculations for nonnormal distributions. Thanks for any pointers. From mathgroup-adm at smc.vnet.net Thu Jul 21 19:30:36 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 742FD6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:30:36 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0Ubex014573; Thu, 21 Jul 2011 19:30:37 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id C3DEFA81BD; Thu, 21 Jul 2011 19:30:37 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 6741BBF4B5; Thu, 21 Jul 2011 19:30:36 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16865 for mathgroup-newout; Thu, 21 Jul 2011 21:09:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16860 for mathgroup-newsend; Thu, 21 Jul 2011 21:09:13 -0400 (EDT) Date: Thu, 21 Jul 2011 21:09:13 -0400 (EDT) Message-Id: <201107220109.VAA16860 at smc.vnet.net> From: carlos at colorado.edu Subject: [mg120424] Re: Total plot width References: <201107201032.GAA24081 at smc.vnet.net> <j08st7$6ik$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.2114 On Jul 21, 3:52 am, Murray Eisenberg <mur... at math.umass.edu> wrote: > The option you want is ImageSize. > > On 7/20/11 6:32 AM, car... at colorado.edu wrote: > > > How can I specify the total plot width in Mathematica? I was looking for > > something like AbsolutePlotWidth->250 (points implied) but havent found > > that option in the documentation. There is AspectRatio, but that is > > not a dimension. Thanks. > > -- > Murray Eisenberg mur... at math.umass.edu > Mathematics & Statistics Dept. > Lederle Graduate Research Tower phone 413 549-1020 (H) > University of Massachusetts 413 545-2859 (W) > 710 North Pleasant Street fax 413 545-1801 > Amherst, MA 01003-9305 Thanks to all who replied. ImageSize works fine, I had missed that option. Sometimes one need to sync widths between multiple plots to simplify downstream editing by Illustrator and placing on a single LaTeX page with [p]. From mathgroup-adm at smc.vnet.net Thu Jul 21 19:32:38 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E084F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:32:38 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0WeQh014883; Thu, 21 Jul 2011 19:32:40 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 35F61BF4B8; Thu, 21 Jul 2011 19:32:40 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 936CDBF4B5; Thu, 21 Jul 2011 19:32:38 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16761 for mathgroup-newout; Thu, 21 Jul 2011 21:06:33 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16756 for mathgroup-newsend; Thu, 21 Jul 2011 21:06:32 -0400 (EDT) Date: Thu, 21 Jul 2011 21:06:32 -0400 (EDT) Message-Id: <201107220106.VAA16756 at smc.vnet.net> From: David Reiss <dbreiss at gmail.com> Subject: [mg120409] Re: Warning: OS X Lion and compilation References: <j08smg$6eh$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.2114 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __PHISH_SPEAR_SUBJECT 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I believe that XCode 4.1 for Lion is now free and I believe that the compilers are installed with an installation of XCode... http://developer.apple.com/xcode/ I haven't installed Lion yet since I use Eudora and can't find a better email client ... and Eudora is PowerPC... :-( --David On Jul 21, 5:49 am, dr DanW <dmaxwar... at gmail.com> wrote: > I have not dug thoroughly into this yet, but I wanted to get the warning out quickly. Apparently, OS X Lion does not include the gcc compiler. I upgraded to Lion this morning, then on a lark tried to compile a function in Mathematica with CompilationTarget -> "C". I got an error that no compiler was found. > > I am sure that it is only a matter of either obtaining a copy of gcc or Xcode (with its own c compiler, not gcc) and configuring Mathematica to use that compiler. I have not tried either, since I am not using anything but opcode compilation. If you are successful, please post instructions for others on this group. > > Thanks, > Daniel From mathgroup-adm at smc.vnet.net Thu Jul 21 19:34:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 995056BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:34:40 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0Yf95015402; Thu, 21 Jul 2011 19:34:41 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id E3B5EBF4B5; Thu, 21 Jul 2011 19:34:40 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id F3C32A8190; Thu, 21 Jul 2011 19:34:38 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16853 for mathgroup-newout; Thu, 21 Jul 2011 21:08:53 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16848 for mathgroup-newsend; Thu, 21 Jul 2011 21:08:52 -0400 (EDT) Date: Thu, 21 Jul 2011 21:08:52 -0400 (EDT) Message-Id: <201107220108.VAA16848 at smc.vnet.net> From: The Wolfram Team <info at wolfram.com> Subject: [mg120422] Share ideas more easily with Wolfram's new Computable Document Format (CDF) To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.2114 Today, Wolfram is officially launching the Computable Document Format (CDF)--a new public standard merging the simplicity of documents and interactivity of apps into a single, computation-powered knowledge container that empowers readers to drive content and generate results live. CDF is an evolution of the notebook (.nb) and is the new standard for sharing Mathematica output--broadening accessibility of the Wolfram platform. Simply save interactive papers, reports, presentations, infographics, and knowledge applications as CDFs in Mathematica 8 and the free Wolfram CDF Player lets anyone interact with your content directly in a web browser. Watch a brief video introduction of CDF: http://www.wolfram.com/broadcast/screencasts/cdf_intro See how easy it is to create CDFs in Mathematica 8: http://www.wolfram.com/broadcast/screencasts/creating-a-knowledge-app-in-60-seconds CDF technology is already being used in some of today's most popular interactive publications, including Pearson Education's award-winning Calculus textbook by William L. Briggs and Lyle Cochran. Start exploring the possibilities of CDF in Mathematica 8 and let us know how you have used it. The Wolfram Team PS: You can also learn more about CDF at the Wolfram Technology Conference 2011: http://www.wolfram.com/events/technology-conference-2011 From mathgroup-adm at smc.vnet.net Thu Jul 21 19:36:53 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1114D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:36:53 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0asdD015843; Thu, 21 Jul 2011 19:36:54 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 09B65A8180; Thu, 21 Jul 2011 19:36:54 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 405E1A8169; Thu, 21 Jul 2011 19:36:52 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16749 for mathgroup-newout; Thu, 21 Jul 2011 21:06:11 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16744 for mathgroup-newsend; Thu, 21 Jul 2011 21:06:11 -0400 (EDT) Date: Thu, 21 Jul 2011 21:06:11 -0400 (EDT) Message-Id: <201107220106.VAA16744 at smc.vnet.net> From: Daniel Lichtblau <danl at wolfram.com> Subject: [mg120407] Re: Inverse of Interpolating Function? References: <201107201031.GAA24058 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3014 On 07/20/2011 05:31 AM, gonzorascal wrote: > Hello All, > > I am working with an Interpolating Function of an oscillating solution (time series) to a differential equation. I am trying to find the period and pulse width of the oscillation. To do this I would like to have an inverse of my function y[t] (so I would have t[y]). I realize this function would be multivalued (that's what I want to find the period). I am not having success using Mathematica's InverseFunction[] or Reduce[] commands. Does anyone have any experience or suggestions with this sort of thing (either finding Inverse Interpolating Functions or another method for period and pulse width)? Thank you. > > -GR > Here is an approach that might be suitable, at least if you can sample from a fairly large number of periods. (1) Sample your function in equal intervals. (2) Take the Fourier transform. (3) Find the largest frequency, not counting the first (DC) component. (4) ue that to estimate the period. Here is an example. We'll use a reference function that is a simple sinusoid. y[t] /. First[ DSolve[{y''[t] == -2*y[t], y[0] == 0, y'[0] == 1}, y[t], t]] Out[1500]= Sin[Sqrt[2] t]/Sqrt[2] The period is Sqrt[2]*Pi, or around 4.44288 We will now obtain this as an InterpolatingFunction from NDSolve, add a DC component, sample at intervals, and add some random noise. soln = y[t] /. First[NDSolve[{y''[t] == -2*y[t], y[0] == 0, y'[0] == 1}, y[t], {t, 0, 150}]] separation = .1; vals = Table[soln + 3, {t, 0., 150., separation}]; vals = vals + RandomReal[{-.1, .1}, Length[vals]]; ft = Abs[Fourier[vals]]; mainfreq = Position[Rest[ft], Max[Rest[ft]]][[1, 1]] Out[1563]= 34 Here is the period estimate. In[1564]:= N[Length[vals]/mainfreq]*separation Out[1564]= 4.41471 So this agrees with the period of the unperturbed signal to 2+ decimal places. A related approach may be found at Documentation Center > Fourier > Applications > Frequency Identification Daniel Lichtblau Wolfram Research From mathgroup-adm at smc.vnet.net Thu Jul 21 19:38:44 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C39916BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:38:44 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0cj8W016283; Thu, 21 Jul 2011 19:38:45 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 50AA1BF4B8; Thu, 21 Jul 2011 19:38:45 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 05020BF4B5; Thu, 21 Jul 2011 19:38:43 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16824 for mathgroup-newout; Thu, 21 Jul 2011 21:08:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16819 for mathgroup-newsend; Thu, 21 Jul 2011 21:08:09 -0400 (EDT) Date: Thu, 21 Jul 2011 21:08:09 -0400 (EDT) Message-Id: <201107220108.VAA16819 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120418] Re: newbie Map, Dynamic, etc References: <201107210947.FAA06542 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3014 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P5 0, __CP_MEDIA_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Suppose plots is your list of imported images, then you could do something like pts = Table[{0, 0}, {Length[plots]}] Manipulate[LocatorPane[Dynamic[pts[[k]]], plots[[k]]], {{k, 1, "Index"}, Range[Length[plots]], ControlType -> Slider, Appearance -> "Labeled"}] The k-th entry in pts will correspond to the coordinates of the locator on the k-th image. You can even see a live update of the coordinates while you manipulate the locators by doing something like Dynamic[pts // TableForm] Heike On 21 Jul 2011, at 10:47, Gareth Edwards wrote: > Hi, > > Still playing around with Mathematica as a newbie and wrestling with the > 'different' way one has to think about things as opposed to other > languages. I think (hopefully) that an informative example for me would be a > solution (or at least some hints) to the following: > > Say I have an image sequence (mySequence_0000.jpg, etc.) I'd like to create > a viewer with a slider that scrubs through the images. That I can do. > > What I'd also like is an array of points (just one point per image, and > initialized to {0,0} say ), such that on each image I can move a locator > around and thereby modify the corresponding stored point in the array. In > other words, store the location of a point (as manipulated by me) against > each image. > > My gut tells me that this is trivial to the average Mathematica user- the > trouble is I remain well below average right now! > > Any help appreciated. > > Best, > > Gareth > > -- > Dr. Gareth Edwards > Director > www.cubicmotion.com > > Mobile: +44 7813 534111 > Office: +44 1925 606430 > Fax: +44 161 884 0095 > > This email and any files transmitted with it are confidential and intended > solely for the use of the individual or entity to whom they are addressed. > It may not be disclosed, copied, forwarded, used or relied upon by any > person other than the intended addressee. If you believe that you have > received the e-mail and its attachment(s) in error, you must not take any > action based on them, nor must you copy or show them to anyone. If you have > received this email in error please notify postmaster at cubicmotion.com. > > From mathgroup-adm at smc.vnet.net Thu Jul 21 19:41:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C93666BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:41:16 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0fIF3017269; Thu, 21 Jul 2011 19:41:18 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id C6CC2BF4B8; Thu, 21 Jul 2011 19:41:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id DC191A8169; Thu, 21 Jul 2011 19:41:15 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16755 for mathgroup-newout; Thu, 21 Jul 2011 21:06:22 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16750 for mathgroup-newsend; Thu, 21 Jul 2011 21:06:21 -0400 (EDT) Date: Thu, 21 Jul 2011 21:06:21 -0400 (EDT) Message-Id: <201107220106.VAA16750 at smc.vnet.net> From: Sol Lederman <sol at wolfram.com> Subject: [mg120408] Computer-Based Math Summit To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3014 [ I am helping to put on this international conference and am wanting to spread the word. The conference may be of interest to Mathematica users since it is part of the work of ComputerBasedMath.org which was created by Conrad Wolfram and is initially being supported by Wolfram Research. Separately from the conference, members of this community may want to get involved by helping to develop courseware. ] How do we fix math education? The importance of math to jobs, society, and thinking has exploded over the last few decades. Meanwhile, math education has gotten stuck or has even slipped backward. Why has this chasm opened up? It's all about computers: when they do the calculating, people can work on harder questions, try more concepts, and play with a multitude of new ideas. computerbasedmath.org is a project founded by Conrad Wolfram and initially supported by Wolfram Research to build a completely new math curriculum with computer-based math at its heart -- alongside a campaign to refocus math education away from historical hand-calculating techniques and toward relevant and conceptually interesting topics. computerbasedmath.org is hosting a two-day summit to address the worldwide math education crisis by answering the question, In an era of ubiquitous computing, how should we rebuild math education from the ground up, to keep pace with and drive progress in the real world? If you are a leader in industry, technology, government or education with astake in math we urge you to request an invitation to the summit and to join us in addressing math (and associated STEM) education from all perspectives to kick-start a rational, computer-based new direction. Please see the Computer-Based Math Education Summit site ( http://computerbasedmath.org/events/londonsummit2011/index.html) for more information. Contact the summit organizers at summit at computerbasedmath.org with questions. Whether or not you can attend the inaugural summit we welcome your participation in the Computer-Based Math project. Click the Sign Up link at the Computer-Based Math home page (http://computerbasedmath.org) to keep informed. If you know of other leaders who should be involved in the project we would greatly appreciate knowing about them through the Sign Up link or via the summit at computerbasedmath.org email. From mathgroup-adm at smc.vnet.net Thu Jul 21 19:43:01 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EE7396BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:43:00 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0h1m9017600; Thu, 21 Jul 2011 19:43:01 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 48F92A8180; Thu, 21 Jul 2011 19:43:01 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 0FBE3BF4B8; Thu, 21 Jul 2011 19:42:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16782 for mathgroup-newout; Thu, 21 Jul 2011 21:07:05 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16777 for mathgroup-newsend; Thu, 21 Jul 2011 21:07:04 -0400 (EDT) Date: Thu, 21 Jul 2011 21:07:04 -0400 (EDT) Message-Id: <201107220107.VAA16777 at smc.vnet.net> From: Fonseca <public at fonseca.info> Subject: [mg120412] CDF limitations and unclear professional strategy To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3014 Disappointed... So much things I heard about CDF applications, and then, well, I have to classify them as documents... Very powerful documents, and almost touching the application world but... just interactive documents for an OPEN market... Somehow nothing new than what already existed. Not that it is bad (I personally have already commented a lot of good on the subject). The problem is that I'm still unable to see how could I use this in an cooperation environment. Let's suppose two different scenarios: 1. An application to be distributed to 100 colleagues of the same company, that, well, to make it simple, just needs to import a gif image, apply some sort of simple filter, and export it to a gif file. Very simple application, but not feasible. There isn't even concrete information on the subject (besides "please contact us"). Have contacted several times on the subject, and always no solution... Has this changed? Why so much mystery on the PROfessional use of this technology (this confirms what I keep hearing from others: academic, institutes, governments, etc, but not corporate...)? 100 special licenses for such a simple application? 2. Let's suppose I developed a package that does some awesome stuff, and really toke me some time to develop it. I use it to write a report for a client, and I want to give the report as an interactive document to the client (nothing could be better than CDF!). But the interaction needs my package (there's no way of previously generating all possible outputs). So, I can't send it to my client, since I risk having it copied to my competitors. Each client to whom I send a report needs a professional version? I mean, each person in the company of my client, and their consultant partners that will evaluate my report...? Or is this now the other way around: each report or report revision needs to be converted at Wolfram for pro functionalists activation on the standard player (I sign confidential agreements with my client...)? After all the announcements I have no idea what's the strategy. Did I missed some information on WR site? I just resent some questions to WR on the "please contact us", to see if something changed in the past couple of months (when I last insisted). Waiting for the answer, but why all the mystery on the PRO version? What can't WR figure out about a professional strategy? Can someone from Wolfram clarify this here for everyone? Is there a strategy for these two very common and simple examples of my world? Is this only meant for publishing documents on an OPEN environment, or on a direct revenue strategy (selling each document/application copy for a not so small price?). It's interesting that all the examples presented in the site are of very simple applications, but how can these simple application be used on a closed corporate environment, if the licensing of the applications cost more than their internal development cost? I'm completely in the dark... I know that I already asked this before, without great success (just one person answered), but, am I the only one here? Regards, P. Fonseca From mathgroup-adm at smc.vnet.net Thu Jul 21 19:43:06 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7ECFC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:43:06 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0h7p4017942; Thu, 21 Jul 2011 19:43:07 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id A71D5A8190; Thu, 21 Jul 2011 19:43:06 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 70DB8A818A; Thu, 21 Jul 2011 19:43:03 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16734 for mathgroup-newout; Thu, 21 Jul 2011 21:05:50 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16729 for mathgroup-newsend; Thu, 21 Jul 2011 21:05:49 -0400 (EDT) Date: Thu, 21 Jul 2011 21:05:49 -0400 (EDT) Message-Id: <201107220105.VAA16729 at smc.vnet.net> From: Arturo Amador <amador at tf.phys.ntnu.no> Subject: [mg120405] Phase Diagrams and problem probably with NIntegrate (or FindRoot) To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3314 Hi, I am trying to make some phase diagrams on Mathematica. I have the following code: (*Free parameters*)n=4 start=150. (*Experimental quantities (MeV)*) mpi=139. msi=600. fpi=93. (*Renormalisation scale*) scale=mpi Sqrt[n] (*Dimensionless auxiliary function*) Jint[x_,y_]:=y^2/Sqrt[x^2+y^2]/(Exp[Sqrt[x^2+y^2]]-1) J[x_]:=NIntegrate[Jint[x,y],{y,0,Infinity}] (*Sum-integral*) qT[m_,t_]:=t^2 J[m/t]/(2 Pi^2) qT[m_,0.]:=0. p0[m_]:=m^2 Log[m^2/scale^2]/(16 Pi^2) p0[0.]:=0. p[m_,t_]:=p0[m]+qT[m,t] (*Physical point*) lp=n (msi^2-mpi^2)/fpi^2 fp=fpi^2 (msi^2-3 mpi^2)/(msi^2-mpi^2)/n hp=mpi^2 fpi/Sqrt[n] (*Chiral limit*) lc=n msi^2/fpi^2 fc=fpi^2/n (*Pion condensate (squared)*) rhop[mui_,t_]:=fp-hp^2/mui^4+2 mui^2/lp-p0[mui]-qT[mui,t] rhoc[mui_,t_]:=fc+2 mui^2/lc-p[mui,t] (*Normalised plot of chiral condensate at mu_I0 MeV*) rnp=Sqrt[rhop[200.,0.]] rnc=Sqrt[rhoc[200.,0.]] rhoplot:=Plot[{Sqrt[rhop[200.,t]]/rnp,Sqrt[rhoc[200.,t]]/rnc},{t,0.,300.},PlotRange->All,AxesOrigin->{0.,0.}] (*Critical temperature and phase diagram*) tcp[mui_]:=FindRoot[rhop[mui,t],{t,start}][[1]][[2]] tcc[mui_]:=FindRoot[rhoc[mui,t],{t,start}][[1]][[2]] phaseplot:=Plot[{tcp[mui],tcc[mui]},{mui,0.01,300.},PlotRange->All,AxesOrigin->{0.,0.}] Grid[rhoplot,phaseplot] It is supposed to give me a pair of plots but I am only getting one and some error messages for the second one (phaseplot). The error that Mathematica gives in the terminal says as follows: NIntegrate::inumr: 2 y The integrand -------------------------------------------------------- 2 2 Sqrt[0.000260124/t + y ] 0.000260124 2 (-1 + E ) Sqrt[----------- + y ] 2 t has evaluated to non-numerical values for all sampling points in the region with boundaries {{Infinity, 0.}}. NIntegrate::inumr: 2 y The integrand -------------------------------------------------------- 2 2 Sqrt[0.000260124/t + y ] 0.000260124 2 (-1 + E ) Sqrt[----------- + y ] 2 t has evaluated to non-numerical values for all sampling points in the region with boundaries {{Infinity, 0.}}. NIntegrate::inumr: 2 y The integrand -------------------------------------------------------- 2 2 Sqrt[0.000260124/t + y ] 0.000260124 2 (-1 + E ) Sqrt[----------- + y ] 2 t has evaluated to non-numerical values for all sampling points in the region with boundaries {{Infinity, 0.}}. General::stop: Further output of NIntegrate::inumr will be suppressed during this calculation. FindRoot::lstol: The line search decreased the step size to within tolerance specified by AccuracyGoal and PrecisionGoal but was unable to find a sufficient decrease in the merit function. You may need more than MachinePrecision digits of working precision to meet these tolerances. The error message that Mathematica gives in the front end is this: NIntegrate::inumr: The integrand y^2/((-1+E^Sqrt[0.000260124 Power[<<2>>]+y^2]) Sqrt[0.000260124/t^2+y^2]) has evaluated to non-numerical values for all sampling points in the region with boundaries {{\[Infinity],0.}}. >> NIntegrate::inumr: The integrand y^2/((-1+E^Sqrt[0.000260124 Power[<<2>>]+y^2]) Sqrt[0.000260124/t^2+y^2]) has evaluated to non-numerical values for all sampling points in the region with boundaries {{\[Infinity],0.}}. >> NIntegrate::inumr: The integrand y^2/((-1+E^Sqrt[0.000260124 Power[<<2>>]+y^2]) Sqrt[0.000260124/t^2+y^2]) has evaluated to non-numerical values for all sampling points in the region with boundaries {{\[Infinity],0.}}. >> General::stop: Further output of NIntegrate::inumr will be suppressed during this calculation. >> NIntegrate::vars: Integration range specification Compile`$19 is not of the form {x, xmin, ..., xmax}. >> NIntegrate::vars: Integration range specification Compile`$19 is not of the form {x, xmin, ..., xmax}. >> NIntegrate::vars: Integration range specification Compile`$19 is not of the form {x, xmin, ..., xmax}. >> General::stop: Further output of NIntegrate::vars will be suppressed during this calculation. >> FindRoot::njnum: The Jacobian is not a matrix of numbers at {t} = {150.}. >> FindRoot::njnum: The Jacobian is not a matrix of numbers at {t} = {150.}. >> When running this in the terminal it seems to keep working for a while, but in the front end it just interrupts all further evaluation. Any comment would be of great help. Thanks, -- Arturo From mathgroup-adm at smc.vnet.net Thu Jul 21 19:43:30 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9BD6C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:43:30 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0hV99017985; Thu, 21 Jul 2011 19:43:31 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id C28B1A818A; Thu, 21 Jul 2011 19:43:31 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D5336BF4B8; Thu, 21 Jul 2011 19:43:28 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16845 for mathgroup-newout; Thu, 21 Jul 2011 21:08:42 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16840 for mathgroup-newsend; Thu, 21 Jul 2011 21:08:41 -0400 (EDT) Date: Thu, 21 Jul 2011 21:08:41 -0400 (EDT) Message-Id: <201107220108.VAA16840 at smc.vnet.net> From: Gary Wardall <gwardall at gmail.com> Subject: [mg120421] Re: Inverse of Interpolating Function? References: <201107210945.FAA06489 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Yes, that is so. I kind of thought that's what GR should do, Gary On Thu, Jul 21, 2011 at 5:17 AM, Oliver Ruebenkoenig <ruebenko at wolfram.com>wrote: > On Thu, 21 Jul 2011, Gary Wardall wrote: > > On Jul 20, 5:34 am, gonzorascal <dj... at duke.edu> wrote: >> >>> Hello All, >>> >>> I am working with an Interpolating Function of an oscillating solution >>> (time series) to a differential equation. I am trying to find the period >>> and pulse width of the oscillation. To do this I would like to have an >>> inverse of my function y[t] (so I would have t[y]). I realize this function >>> would be multivalued (that's what I want to find the period). I am not >>> having success using Mathematica's InverseFunction[] or Reduce[] commands. >>> Does anyone have any experience or suggestions with this sort of thing >>> (either finding Inverse Interpolating Functions or another method for period >>> and pulse width)? Thank you. >>> >>> -GR >>> >> >> gonzorascal, >> >> First make sure the function you wish to have an inverse function is a >> function that has an inverse function. A quick visual test is the >> Horizontal Test for Inverse Functions. If any horizontal line >> intersects the graph twice or more then the inverse is NOT an inverse >> function. Graph the function you wish to create an inverse function >> for. If it fails the horizontal test you may have ti restrict your >> function like is done in Trigonometry. If it passes try something like >> in my example. >> >> >> points = {{0, -1}, {1, 1}, {2, 3}, {3, 4}, {4, 6}, {5, 10}}; ifun= >> Interpolation[points] >> Does the function pass the Horizontal Test? >> >> Plot[ifun[x], {x, 0, 5}] >> >> It does. Define: >> >> invifun[x_] := FindRoot[ifun[y] == x, {y, 0, 5}][[1]][[2]] >> >> Note that: >> >> ifun[invifun[4]] >> >> is 4. >> >> and >> >> invifun[ifun[3]] >> >> is 3. >> >> and look at the sketch. >> >> Plot[{invifun[x], ifun[x], x}, {x, 0, 5}, PlotRange -> {0, 5}, >> AspectRatio -> Automatic] >> >> We have an inverse function. >> >> I hope this will help. >> >> Good Luck >> >> Gary Wardall >> >> >> > You could also use NDSolve for that - that advantage would be that it will > generate an interpolation function > > init = x /. FindRoot[ifun[x] == 0, {x, 0, 1}] > > inf = t /. > First[NDSolve[{t'[a] == 1/(ifun'[t[a]]), t[0] == init}, > t, {a, 0, 5}]] > > Plot[{inf[x], ifun[x], x}, {x, 0, 5}, PlotRange -> {0, 5}, > AspectRatio -> Automatic] > > Oliver > From mathgroup-adm at smc.vnet.net Thu Jul 21 19:44:00 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 867EE6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 21 Jul 2011 19:44:00 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M0i16i018037; Thu, 21 Jul 2011 19:44:01 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 2C42EA818A; Thu, 21 Jul 2011 19:44:01 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 972B1BF4D0; Thu, 21 Jul 2011 19:43:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16832 for mathgroup-newout; Thu, 21 Jul 2011 21:08:20 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id VAA16827 for mathgroup-newsend; Thu, 21 Jul 2011 21:08:19 -0400 (EDT) Date: Thu, 21 Jul 2011 21:08:19 -0400 (EDT) Message-Id: <201107220108.VAA16827 at smc.vnet.net> From: Gareth Edwards <gareth.edwards at cubicmotion.com> Subject: [mg120419] Re: newbie Map, Dynamic, etc References: <201107210947.FAA06542 at smc.vnet.net> <8A9117AD-B871-4686-9CCB-FF12EC28921A at gmail.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.3314 Thanks Heike, that's extremely helpful to understand the way to build these things! Best, Gareth On 21 July 2011 14:58, Heike Gramberg <heike.gramberg at gmail.com> wrote: > Suppose plots is your list of imported images, then you could do something > like > > pts = Table[{0, 0}, {Length[plots]}] > > Manipulate[LocatorPane[Dynamic[pts[[k]]], plots[[k]]], > {{k, 1, "Index"}, Range[Length[plots]], ControlType -> Slider, > Appearance -> "Labeled"}] > > The k-th entry in pts will correspond to the coordinates of the locator on > the k-th > image. You can even see a live update of the coordinates while you > manipulate the > locators by doing something like > > Dynamic[pts // TableForm] > > Heike > > On 21 Jul 2011, at 10:47, Gareth Edwards wrote: > > > Hi, > > > > Still playing around with Mathematica as a newbie and wrestling with the > > 'different' way one has to think about things as opposed to other > > languages. I think (hopefully) that an informative example for me would > be a > > solution (or at least some hints) to the following: > > > > Say I have an image sequence (mySequence_0000.jpg, etc.) I'd like to > create > > a viewer with a slider that scrubs through the images. That I can do. > > > > What I'd also like is an array of points (just one point per image, and > > initialized to {0,0} say ), such that on each image I can move a locator > > around and thereby modify the corresponding stored point in the array. In > > other words, store the location of a point (as manipulated by me) against > > each image. > > > > My gut tells me that this is trivial to the average Mathematica user- the > > trouble is I remain well below average right now! > > > > Any help appreciated. > > > > Best, > > > > Gareth > > > > -- > > Dr. Gareth Edwards > > Director > > www.cubicmotion.com > > > > Mobile: +44 7813 534111 > > Office: +44 1925 606430 > > Fax: +44 161 884 0095 > > > > This email and any files transmitted with it are confidential and > intended > > solely for the use of the individual or entity to whom they are > addressed. > > It may not be disclosed, copied, forwarded, used or relied upon by any > > person other than the intended addressee. If you believe that you have > > received the e-mail and its attachment(s) in error, you must not take any > > action based on them, nor must you copy or show them to anyone. If you > have > > received this email in error please notify postmaster at cubicmotion.com. > > > > > > -- Dr. Gareth Edwards Director www.cubicmotion.com Mobile: +44 7813 534111 Office: +44 1925 606430 Fax: +44 161 884 0095 This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. It may not be disclosed, copied, forwarded, used or relied upon by any person other than the intended addressee. If you believe that you have received the e-mail and its attachment(s) in error, you must not take any action based on them, nor must you copy or show them to anyone. If you have received this email in error please notify postmaster at cubicmotion.com. From mathgroup-adm at smc.vnet.net Fri Jul 22 01:50:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id CA87C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 01:50:18 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M6oJEr016403; Fri, 22 Jul 2011 01:50:19 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 38A95BF4B5; Fri, 22 Jul 2011 01:50:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 3D6FCBF4B0; Fri, 22 Jul 2011 01:50:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20076 for mathgroup-newout; Fri, 22 Jul 2011 03:42:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20071 for mathgroup-newsend; Fri, 22 Jul 2011 03:42:13 -0400 (EDT) Date: Fri, 22 Jul 2011 03:42:13 -0400 (EDT) Message-Id: <201107220742.DAA20071 at smc.vnet.net> From: "Hobbs, Sylvia (DPH)" <sylvia.hobbs at state.ma.us> Subject: [mg120426] Re: mlink SASImport References: <j08sod$6ge$1 at smc.vnet.net>,<ba5c2faf-3868-4f20-b1b2-aa280e7dcf3a at r28g2000prb.googlegroups.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.63616 See: http://library.wolfram.com/infocenter/MathSource/7808/ Sylva Hobbs ________________________________________ From: Gary Owen [jloughlin at loughlinconsulting.com] Sent: Thursday, July 21, 2011 7:36 PM To: Hobbs, Sylvia (DPH) Subject: [mg120426] Re: mlink SASImport On Jul 21, 2:50 am, "Hobbs, Sylvia (DPH)" <sylvia.ho... at state.ma.us> wrote: > After importing a huge SAS data set into Mathematica that contains 400 data elements, is there a global validation command where Mathematica could return a report of on the blanks and content frequencies in all of the data fields or do you have to run separate queries for every single data element? > > Sylvia Hobbs How did you import the SAS data? Did you first export the SAS data to excel or csv and then import that data into Mathematica? Or were you able to import the SAS data directly? If so, what Mathematica code did you use? I use SAS a lot and it would be great if I could import SAS data dircectly into Mathematica. From mathgroup-adm at smc.vnet.net Fri Jul 22 01:50:47 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id ABD266BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 01:50:47 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M6om5u016476; Fri, 22 Jul 2011 01:50:48 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id CF04ABF4B0; Fri, 22 Jul 2011 01:50:48 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 04DBBA8169; Fri, 22 Jul 2011 01:50:47 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20069 for mathgroup-newout; Fri, 22 Jul 2011 03:42:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20064 for mathgroup-newsend; Fri, 22 Jul 2011 03:42:02 -0400 (EDT) Date: Fri, 22 Jul 2011 03:42:02 -0400 (EDT) Message-Id: <201107220742.DAA20064 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120425] Re: mandelbrot in version 7 & Ruskeepaa version 3 References: <j0aivf$ghq$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.63616 There is a space missing between I and y in the expression mandelbrot[x + Iy] (should be mandelbrot[x + I y]). Also, you should omit the semicolon after DensityPlot, otherwise the plot will not be shown. Incidentally, tabulating the values and then plotting them with ArrayPlot is faster for this example than using DensityPlot. That is, ArrayPlot@Table[ mandelbrot[x + I y], {y, -1.5, 1.5, 0.005}, {x, -2.0, 1.0, 0.005} ] On Fri, 22 Jul 2011 02:15:27 +0100, DaleJenk <dale.jenkins8 at deletegooglemail.com> wrote: > I bought Mathematica 7 Home Edition last year. I'm trying to plot the > Mandelbrot Set following the instructions in Ruskeepaa's Mathematica > Navigator version 3. I'm getting an error message. > > Here's what I am introducing: > > mandelbrot = Compile[{{c,_Complex}}, > Module[{z=0+0I, n=0}, While[Abs[z]<2 && n<50, z=z^2+c; n++]; n]]; > > DensityPlot[mandelbrot[x+Iy], {x,-2,1},{y,-1.5,1.5}, PlotPoints->200, > Mesh->False, FrameTicks->{{-2,-1,0,1},{-1,0,1}}]; //Timing > > I get the message: > > CompiledFunction::cfsa: > Argument -1.99998 + Iy at position 1 should be a machine-size complex > number. > > Where am I going wrong? > > Thanks. > From mathgroup-adm at smc.vnet.net Fri Jul 22 01:52:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7F4CC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 01:52:55 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M6qulm017353; Fri, 22 Jul 2011 01:52:56 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id B1F7AA81BA; Fri, 22 Jul 2011 01:52:56 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C73BBFF006; Fri, 22 Jul 2011 01:52:54 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20082 for mathgroup-newout; Fri, 22 Jul 2011 03:42:24 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20077 for mathgroup-newsend; Fri, 22 Jul 2011 03:42:24 -0400 (EDT) Date: Fri, 22 Jul 2011 03:42:24 -0400 (EDT) Message-Id: <201107220742.DAA20077 at smc.vnet.net> From: Bill Rowe <readnews at sbcglobal.net> Subject: [mg120427] Re: TransformedDistribution, for a sum of M iid variables To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.64215 On 7/21/11 at 9:07 PM, paulvonhippel at yahoo.com (paulvonhippel at yahoo) wrote: >Using the TransformedDistribution function it is easy to show that >the sum of two normal variables is normal, e.g., <code snipped> >Likewise it wouldn't be hard to show that the sum of 3 normal >variables is normal, or 4. >But how do I show that the sum of M normal variables is normal, >where M is an arbitrary positive integer. Rather than approach this problem using TransformedDistribution, I would approach this using MomentGeneratingFunction. The moment generating function for the sum of n things selected from a given distribution is the same as the moment generating function for the distribution raised to the nth power. That is for the sum of n standard normal deviates the moment generating function is: In[3]:= MomentGeneratingFunction[NormalDistribution[], t]^n Out[3]= (E^(t^2/2))^n Comparing this to In[4]:= MomentGeneratingFunction[NormalDistribution[0, s], t] Out[4]= E^((s^2*t^2)/2) it is clear the distribution for the sum of n deviates drawn from a standard normal distribution is a normal distribution with mean = 0 variance = n. I should point out the moment generating function doesn't exist for all distributions. In those cases you can use the characteristic function which always exists. And since the characteristic function is essentially the Fourier transform of the distribution function, you can use the inverse Fourier transform to recover the distribution function from the characteristic function. Use of the characteristic function or moment generating function is a very useful technique for answering these types of questions. Each distribution has a unique characteristic function (and moment generating function when it exists). Also, you can easily compute the moments of the distribution directly from the characteristic function or moment generating function without actually finding the distribution function. From mathgroup-adm at smc.vnet.net Fri Jul 22 01:55:04 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 949DC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 01:55:04 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M6t5xW018324; Fri, 22 Jul 2011 01:55:05 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 95DC3FF006; Fri, 22 Jul 2011 01:55:05 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C46DCFF004; Fri, 22 Jul 2011 01:55:03 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20091 for mathgroup-newout; Fri, 22 Jul 2011 03:42:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20086 for mathgroup-newsend; Fri, 22 Jul 2011 03:42:34 -0400 (EDT) Date: Fri, 22 Jul 2011 03:42:34 -0400 (EDT) Message-Id: <201107220742.DAA20086 at smc.vnet.net> From: Bob Hanlon <hanlonr at cox.net> Subject: [mg120428] Re: TransformedDistribution, for a sum of M iid variables To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.63616 Clear[distSN] distSN[1] = NormalDistribution[0, 1]; Assume that distSN[n_] = NormalDistribution[0, Sqrt[n]]; Proof by induction distSN[n + 1] == TransformedDistribution[ x + y, {Distributed[x, distSN[n]], Distributed[y, NormalDistribution[0, 1]]}] True More generally, Clear[distN] distN[1] = NormalDistribution[m, s]; Assume distN[n_] = NormalDistribution[n*m, Sqrt[n*s^2]]; Proof by induction distN[n + 1] == TransformedDistribution[ x + y, {Distributed[x, distN[n]], Distributed[y, NormalDistribution[m, s]]}] // ExpandAll True More general forms cannot be as proved as readily; however, the extensions are obvious. Clear[dist] dist[n_Integer?Positive] = NormalDistribution[Sum[m[k], {k, n}], Sqrt[Sum[s[k]^2, {k, n}]]]; dist[m_List, s_List] := NormalDistribution[Total[m], Norm[s]] /; Length[m] == Length[s]; For example, dist[4] NormalDistribution[m[1] + m[2] + m[3] + m[4], Sqrt[s[1]^2 + s[2]^2 + s[3]^2 + s[4]^2]] With[{n = RandomInteger[{10, 100}]}, Simplify[ dist[n] == dist[Table[m[k], {k, n}], Table[s[k], {k, n}]], Thread[Table[s[k], {k, n}] > 0]]] True Testing consistency with the simpler cases: With[{n = RandomInteger[{10, 100}]}, (dist[n] /. {m[_] -> m, s[_] -> s}) == distN[n]] True With[{n = RandomInteger[{10, 100}]}, (dist[n] /. {m[_] -> 0, s[_] -> 1}) == distSN[n]] True Bob Hanlon ---- paulvonhippel at yahoo <paulvonhippel at yahoo.com> wrote: ============= Using the TransformedDistribution function it is easy to show that the sum of two normal variables is normal, e.g., Input: TransformedDistribution[Z1+Z2,{Z1\ [Distributed]NormalDistribution[0,1],Z2\ [Distributed]NormalDistribution[0,1]}] Output: NormalDistribution[0, Sqrt[2]] Likewise it wouldn't be hard to show that the sum of 3 normal variables is normal, or 4. But how do I show that the sum of M normal variables is normal, where M is an arbitrary positive integer. I'm thinking I should use the Sum function inside TransformedDistribution, but I don't know how the notation would work. I see that there's a UniformSumDistribution function, but that's limited to uniform variables. Later I will want to do similar calculations for nonnormal distributions. Thanks for any pointers. -- Bob Hanlon From mathgroup-adm at smc.vnet.net Fri Jul 22 01:57:32 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BAC6D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 01:57:32 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6M6vYfk018561; Fri, 22 Jul 2011 01:57:34 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id CC029A8169; Fri, 22 Jul 2011 01:57:33 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C1AAAFF006; Fri, 22 Jul 2011 01:57:31 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20099 for mathgroup-newout; Fri, 22 Jul 2011 03:42:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA20094 for mathgroup-newsend; Fri, 22 Jul 2011 03:42:45 -0400 (EDT) Date: Fri, 22 Jul 2011 03:42:45 -0400 (EDT) Message-Id: <201107220742.DAA20094 at smc.vnet.net> From: Paul von Hippel <paulvonhippel at yahoo.com> Subject: [mg120429] Re: TransformedDistribution, for a sum of M iid variables References: <20110721225621.9H9BM.1153349.imail@eastrmwml34> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.64514 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __INT_PROD_IPHONE 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Thanks for the neat proof. Sorry I wasn't clear about my goals. I want to include a sum of iid variables in a TransfornedDistribution, and then calculate the Mean and Variance of the distribution. The iid variables need not be normal, and the TrasformedDistribution will contain other variables besides the iid sum. Sent from my iPhone. Please excuse my brevity. On Jul 21, 2011, at 9:56 PM, Bob Hanlon <hanlonr at cox.net> wrote: > Clear[distSN] > > distSN[1] = NormalDistribution[0, 1]; > > Assume that > > distSN[n_] = NormalDistribution[0, Sqrt[n]]; > > Proof by induction > > distSN[n + 1] == > TransformedDistribution[ > x + y, {Distributed[x, distSN[n]], > Distributed[y, NormalDistribution[0, 1]]}] > > True > > More generally, > > Clear[distN] > > distN[1] = NormalDistribution[m, s]; > > Assume > > distN[n_] = NormalDistribution[n*m, Sqrt[n*s^2]]; > > Proof by induction > > distN[n + 1] == > TransformedDistribution[ > x + y, {Distributed[x, distN[n]], > Distributed[y, NormalDistribution[m, s]]}] // ExpandAll > > True > > More general forms cannot be as proved as readily; however, the extensions= are obvious. > > Clear[dist] > > dist[n_Integer?Positive] = > NormalDistribution[Sum[m[k], {k, n}], Sqrt[Sum[s[k]^2, {k, n}]]]; > > dist[m_List, s_List] := > > NormalDistribution[Total[m], Norm[s]] /; Length[m] == Length[s]; > > For example, > > dist[4] > > NormalDistribution[m[1] + m[2] + m[3] + m[4], > Sqrt[s[1]^2 + s[2]^2 + s[3]^2 + s[4]^2]] > > With[{n = RandomInteger[{10, 100}]}, > Simplify[ > dist[n] == dist[Table[m[k], {k, n}], Table[s[k], {k, n}]], > Thread[Table[s[k], {k, n}] > 0]]] > > True > > Testing consistency with the simpler cases: > > With[{n = RandomInteger[{10, 100}]}, > (dist[n] /. {m[_] -> m, s[_] -> s}) == distN[n]] > > True > > With[{n = RandomInteger[{10, 100}]}, > (dist[n] /. {m[_] -> 0, s[_] -> 1}) == distSN[n]] > > True > > > Bob Hanlon > > > > ---- paulvonhippel at yahoo <paulvonhippel at yahoo.com> wrote: > > ============= > Using the TransformedDistribution function it is easy to show that the > sum of two normal variables is normal, e.g., > > Input: > TransformedDistribution[Z1+Z2,{Z1\ > [Distributed]NormalDistribution[0,1],Z2\ > [Distributed]NormalDistribution[0,1]}] > > Output: > NormalDistribution[0, Sqrt[2]] > > > Likewise it wouldn't be hard to show that the sum of 3 normal > variables is normal, or 4. > > But how do I show that the sum of M normal variables is normal, where > M is an arbitrary positive integer. > > I'm thinking I should use the Sum function inside > TransformedDistribution, but I don't know how the notation would work. > I see that there's a UniformSumDistribution function, but that's > limited to uniform variables. > > Later I will want to do similar calculations for nonnormal > distributions. > > Thanks for any pointers. > > > -- > > Bob Hanlon > From mathgroup-adm at smc.vnet.net Fri Jul 22 17:52:13 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 730C36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 17:52:13 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MMqEuo013006; Fri, 22 Jul 2011 17:52:14 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 839F4A8194; Fri, 22 Jul 2011 17:52:14 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C49AEA815B; Fri, 22 Jul 2011 17:52:12 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28577 for mathgroup-newout; Fri, 22 Jul 2011 19:45:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28572 for mathgroup-newsend; Fri, 22 Jul 2011 19:45:03 -0400 (EDT) Date: Fri, 22 Jul 2011 19:45:03 -0400 (EDT) Message-Id: <201107222345.TAA28572 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120431] Re: How Can I Eliminate Line Wrapping When Using the Row Function Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.224214 On Thu, 21 Jul 2011 21:06:54 -0400 (EDT), Gregory Lypny wrote: > Hello everyone, > > Sometimes when I use Row for four or five items, the result wraps over > two lines. How can I force the result to be displayed on one line? I > couldn't find an option for this in Documentation Centre. > > Gregory This is the intended behavior of Row. If you don't want word-wrapping, then you probably want a single row Grid[]. So, instead of doing Row[{items}], instead do Grid[{{items}}]. If Row is really doing everything else you want, then I suppose you could also do... ExpressionCell[Row[{items}], LineBreakWithin->False] Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Fri Jul 22 17:54:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 96D7E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 17:54:55 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MMsu4L013243; Fri, 22 Jul 2011 17:54:56 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 92DA6BF4D0; Fri, 22 Jul 2011 17:54:56 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id EB8FCBF417; Fri, 22 Jul 2011 17:54:54 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28634 for mathgroup-newout; Fri, 22 Jul 2011 19:46:41 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28629 for mathgroup-newsend; Fri, 22 Jul 2011 19:46:39 -0400 (EDT) Date: Fri, 22 Jul 2011 19:46:39 -0400 (EDT) Message-Id: <201107222346.TAA28629 at smc.vnet.net> From: DC <b.gatessucks at gmail.com> Subject: [mg120440] Re: CDF limitations and unclear professional strategy Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.224214 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_10_99 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_7 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Hi, once more I'm with you 100%. -Francesco From mathgroup-adm at smc.vnet.net Fri Jul 22 17:55:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3EE186BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 17:55:59 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MMu0f0013903; Fri, 22 Jul 2011 17:56:00 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 2834FBF417; Fri, 22 Jul 2011 17:56:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 63140A8169; Fri, 22 Jul 2011 17:55:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28609 for mathgroup-newout; Fri, 22 Jul 2011 19:45:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28603 for mathgroup-newsend; Fri, 22 Jul 2011 19:45:56 -0400 (EDT) Date: Fri, 22 Jul 2011 19:45:56 -0400 (EDT) Message-Id: <201107222345.TAA28603 at smc.vnet.net> From: William Shaw <w.shaw at ucl.ac.uk> Subject: [mg120436] IMS 2012 To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.224518 You might like to know that the 2012 International Mathematica Symposium will be held at University College London in June 2012. The first announcement is at www.ims2012.org.uk Kind regards William William T. Shaw Chair, Mathematics and Computation of Risk Departments of Mathematics and Computer Science University College London w.shaw at ucl.ac.uk www.homepages.ucl.ac.uk/~ucahwts/ From mathgroup-adm at smc.vnet.net Fri Jul 22 17:58:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 66D636BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 17:58:50 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MMwpkL014075; Fri, 22 Jul 2011 17:58:51 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 6E64EA8169; Fri, 22 Jul 2011 17:58:51 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id EAAF5BF4BA; Fri, 22 Jul 2011 17:58:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28640 for mathgroup-newout; Fri, 22 Jul 2011 19:46:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28635 for mathgroup-newsend; Fri, 22 Jul 2011 19:46:50 -0400 (EDT) Date: Fri, 22 Jul 2011 19:46:50 -0400 (EDT) Message-Id: <201107222346.TAA28635 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120441] Re: How Can I Eliminate Line Wrapping When Using the Row Function References: <201107220106.VAA16771 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.224518 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. The option ImageSize in Row dictates the total size of the row, so you could try setting that to a large enough value. Heike On 22 Jul 2011, at 02:06, Gregory Lypny wrote: > Hello everyone, > > Sometimes when I use Row for four or five items, the result wraps over two lines. How can I force the result to be displayed on one line? I couldn't find an option for this in Documentation Centre. > > Gregory > > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:00:07 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6E0E26BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:00:07 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MN081g014470; Fri, 22 Jul 2011 18:00:08 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 74734A8190; Fri, 22 Jul 2011 18:00:08 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E6116A818F; Fri, 22 Jul 2011 18:00:06 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28615 for mathgroup-newout; Fri, 22 Jul 2011 19:46:08 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28610 for mathgroup-newsend; Fri, 22 Jul 2011 19:46:07 -0400 (EDT) Date: Fri, 22 Jul 2011 19:46:07 -0400 (EDT) Message-Id: <201107222346.TAA28610 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at jmsb.concordia.ca> Subject: [mg120437] Preventing In-line Math Typesetting From Being Scaled Down in Text Cells To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.224518 Hi everyone, When I include fractions as inline math typesetting, they are scaled down to fit the effective line height of the cell. How can I prevent this or, I guess, make the line height automatically expand to accommodate the math? If my regular text in the cell is 12-point times, I'd like all math variables that are not subscripts or superscripts to be 12-point as well. Incidentally, other big typeset objects like matrices are not scaled down, or at least they down't appear to be. Sincerely, Gregory From mathgroup-adm at smc.vnet.net Fri Jul 22 18:02:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6AA526BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:02:19 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MN2Kx5014999; Fri, 22 Jul 2011 18:02:20 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 58047A8194; Fri, 22 Jul 2011 18:02:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A960FA818F; Fri, 22 Jul 2011 18:02:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28583 for mathgroup-newout; Fri, 22 Jul 2011 19:45:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28578 for mathgroup-newsend; Fri, 22 Jul 2011 19:45:13 -0400 (EDT) Date: Fri, 22 Jul 2011 19:45:13 -0400 (EDT) Message-Id: <201107222345.TAA28578 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120432] Re: How Can I Include a Button in a Manipulate References: <201107220107.VAA16785 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.225118 Hi Heike, Thank you. I'll certainly experiment with this one. Gregory On Fri, Jul 22, 2011, at 4:51 AM, Heike Gramberg wrote: > You could do something like > > Manipulate[Module[{p}, > q; p = RandomInteger[max, {height, width}]; > p // TableForm], > {{width, 3}, Range[8], SetterBar}, > {{height, 3}, Range[8], SetterBar}, > {{max, 4}, Range[10], SetterBar}, > {{q, False}, ControlType -> None}, > Control[Button["Regenerate", q = Not[q]]] > ] > > Heike > > On 22 Jul 2011, at 02:07, Gregory Lypny wrote: > >> Hello everyone, >> >> I have a Manipulate that generates a random integer or integers >> depending on the user's choice of parameters in a number of setter >> bars. I'd like to include a button in the Manipulate's output pane >> that allows the user to generate a new result by generating a new random >> number while keeping all of the parameters in the setter bar the same. >> Can that be done? >> >> >> Regards, >> >> Gregory >> > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:02:49 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C9D496BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:02:49 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MN2pDR015169; Fri, 22 Jul 2011 18:02:51 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 2BAD2A818F; Fri, 22 Jul 2011 18:02:51 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id ABB43A8169; Fri, 22 Jul 2011 18:02:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28628 for mathgroup-newout; Fri, 22 Jul 2011 19:46:29 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28623 for mathgroup-newsend; Fri, 22 Jul 2011 19:46:29 -0400 (EDT) Date: Fri, 22 Jul 2011 19:46:29 -0400 (EDT) Message-Id: <201107222346.TAA28623 at smc.vnet.net> From: paulvonhippel at yahoo <paulvonhippel at yahoo.com> Subject: [mg120439] Re: TransformedDistribution, for a sum of M iid variables References: <20110721225621.9H9BM.1153349.imail@eastrmwml34> <j0b9p4$jl1$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.225118 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_500_599 0, BODY_SIZE_7000_LESS 0, FROM_NAME_PHRASE 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. To clarify what I'm looking for, suppose I have the following distribution: TransformedDistribution[Z1+Sqrt[U/(n-1)]*Z2,{Z1\ [Distributed]NormalDistribution[0,1],Z2\ [Distributed]NormalDistribution[0,1],U\ [Distributed]ChiSquareDistribution[n-1]}] I want to replace Z2 with the average of M independent variables that are distributed like Z2. Or I might want to replace U with the average of M independent variables that are distributed like U. Is there a convenient way to do this? Thanks! From mathgroup-adm at smc.vnet.net Fri Jul 22 18:03:54 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7488B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:03:54 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MN3tYn015407; Fri, 22 Jul 2011 18:03:55 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id CB2E7A815B; Fri, 22 Jul 2011 18:03:55 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 608B1A813D; Fri, 22 Jul 2011 18:03:54 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28646 for mathgroup-newout; Fri, 22 Jul 2011 19:47:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28641 for mathgroup-newsend; Fri, 22 Jul 2011 19:47:01 -0400 (EDT) Date: Fri, 22 Jul 2011 19:47:01 -0400 (EDT) Message-Id: <201107222347.TAA28641 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120442] Re: How Can I Include a Button in a Manipulate References: <201107220107.VAA16785 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.225416 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You could do something like Manipulate[Module[{p}, q; p = RandomInteger[max, {height, width}]; p // TableForm], {{width, 3}, Range[8], SetterBar}, {{height, 3}, Range[8], SetterBar}, {{max, 4}, Range[10], SetterBar}, {{q, False}, ControlType -> None}, Control[Button["Regenerate", q = Not[q]]] ] Heike On 22 Jul 2011, at 02:07, Gregory Lypny wrote: > Hello everyone, > > I have a Manipulate that generates a random integer or integers > depending on the user's choice of parameters in a number of setter > bars. I'd like to include a button in the Manipulate's output pane > that allows the user to generate a new result by generating a new random > number while keeping all of the parameters in the setter bar the same. > Can that be done? > > > Regards, > > Gregory > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:06:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 79CAF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:06:42 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MN6hst015719; Fri, 22 Jul 2011 18:06:43 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9F698BF4BA; Fri, 22 Jul 2011 18:06:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id DC7BBBF417; Fri, 22 Jul 2011 18:06:39 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28654 for mathgroup-newout; Fri, 22 Jul 2011 19:47:13 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28649 for mathgroup-newsend; Fri, 22 Jul 2011 19:47:12 -0400 (EDT) Date: Fri, 22 Jul 2011 19:47:12 -0400 (EDT) Message-Id: <201107222347.TAA28649 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120443] Re: ExampleData[{"Geometry3D", "Torus"}] References: <201107220106.VAA16736 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230015 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_900_999 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I'm not familiar with Torus[] but another option might be to use RevolutionPlot3D, i.e. torus[r1_, r2_] := RevolutionPlot3D[{r1 + r2 Cos[t], 0, r2 Sin[t]}, {t, 0, 2 Pi}, Mesh -> False, PlotPoints -> 60, Boxed -> False, Axes -> False] torus[1, 0.5] Heike On 22 Jul 2011, at 02:06, Joseph O'Rourke wrote: > Thanks, Oliver. I know how to make a torus via ParametricPlot3D[], and by using the deprecated Torus[] function. I was wondering if ExampleData[] could be adjusted so that one would have the same control as with the old Torus[] function. The reason I wanted this is that the torus produced by ExampleData[] looks much nicer than that produced by Torus[]. Or, at least, I cannot get the latter to look as smooth when rendered as the former. But maybe I should just use ParametricPlot3D[] with Mehs->None as you suggest. Thanks again for your attention. > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:07:58 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C961D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:07:58 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MN80V2015809; Fri, 22 Jul 2011 18:08:00 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 24E9CA813D; Fri, 22 Jul 2011 18:08:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 7A9DBFF003; Fri, 22 Jul 2011 18:07:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28662 for mathgroup-newout; Fri, 22 Jul 2011 19:47:24 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28657 for mathgroup-newsend; Fri, 22 Jul 2011 19:47:23 -0400 (EDT) Date: Fri, 22 Jul 2011 19:47:23 -0400 (EDT) Message-Id: <201107222347.TAA28657 at smc.vnet.net> From: Yves Klett <yves.klett at googlemail.com> Subject: [mg120444] Re: Producing an image that only contains its interior and boundary but, no exterior. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230015 Not really sure what you are looking for, but perhaps this can help: g = Graphics3D[Cuboid[], SphericalRegion -> True] Show[g, Method -> {"ShrinkWrap" -> True}] I presume this is similar to right-clicking on a graphic and choosing "Trim Bounding Box" The shrinkwrapping thing can sometimes affect the interactive performance, i.e. I had cases where rotation via mouse becomes sluggish, perhaps not surprisingly so. Regards, Yves Am 22.07.2011 03:11, schrieb Gilmar Rodriguez-pierluissi: > This is an old issue mentioned by the late Jens-Peer Kuska in: > http://forums.wolfram.com/mathgroup/archive/2006/Mar/msg00037.html > How can a user produce a graphic image that includes only its interior and boundary but, > without the exterior. This would facilitate embedding an image within another without > having to waste time having to eliminate the annoying edges. Thank you! > Gilmar Rodriguez-Pierluissi From mathgroup-adm at smc.vnet.net Fri Jul 22 18:10:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 53F0F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:10:46 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNAl2Q027008; Fri, 22 Jul 2011 18:10:47 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 52D67A813D; Fri, 22 Jul 2011 18:10:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 85431BF417; Fri, 22 Jul 2011 18:10:45 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28672 for mathgroup-newout; Fri, 22 Jul 2011 19:47:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28666 for mathgroup-newsend; Fri, 22 Jul 2011 19:47:34 -0400 (EDT) Date: Fri, 22 Jul 2011 19:47:34 -0400 (EDT) Message-Id: <201107222347.TAA28666 at smc.vnet.net> From: "Kevin J. McCann" <kjm at KevinMcCann.com> Subject: [mg120445] Re: mandelbrot in version 7 & Ruskeepaa version 3 References: <j0aivf$ghq$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230015 Two things. The error is due to your argument x+Iy in the call to mandelbrot. You need a space between the I and the y, i.e. x+I y. Second, you have a semicolon at the end of the DensityPlot call; this prevents the plot from being shown. Kevin On 7/21/2011 9:15 PM, DaleJenk wrote: > I bought Mathematica 7 Home Edition last year. I'm trying to plot the > Mandelbrot Set following the instructions in Ruskeepaa's Mathematica > Navigator version 3. I'm getting an error message. > > Here's what I am introducing: > > mandelbrot = Compile[{{c,_Complex}}, > Module[{z=0+0I, n=0}, While[Abs[z]<2&& n<50, z=z^2+c; n++]; n]]; > > DensityPlot[mandelbrot[x+Iy], {x,-2,1},{y,-1.5,1.5}, PlotPoints->200, > Mesh->False, FrameTicks->{{-2,-1,0,1},{-1,0,1}}]; //Timing > > I get the message: > > CompiledFunction::cfsa: > Argument -1.99998 + Iy at position 1 should be a machine-size complex > number. > > Where am I going wrong? > > Thanks. > > > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:12:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A45086BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:12:16 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNCHwS029564; Fri, 22 Jul 2011 18:12:17 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id D1706A8190; Fri, 22 Jul 2011 18:12:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 215D3BF4B9; Fri, 22 Jul 2011 18:12:16 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28622 for mathgroup-newout; Fri, 22 Jul 2011 19:46:18 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28617 for mathgroup-newsend; Fri, 22 Jul 2011 19:46:18 -0400 (EDT) Date: Fri, 22 Jul 2011 19:46:18 -0400 (EDT) Message-Id: <201107222346.TAA28617 at smc.vnet.net> From: Curtis Osterhoudt <cfo at lanl.gov> Subject: [mg120438] Re: mandelbrot in version 7 & Ruskeepaa version 3 Reply-To: cfo at lanl.gov References: <201107220109.VAA16854 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230015 Looks as though the "Iy" in the code needs to be I (that's a capital aye) times why: I*y. If there wasn't a space in the original code, Mathematica interprets it as a new, two-character symbol, not the product of the imaginary basis times y. Hope that helps! On Thursday, July 21, 2011 19:09:03 DaleJenk wrote: > I bought Mathematica 7 Home Edition last year. I'm trying to plot the > Mandelbrot Set following the instructions in Ruskeepaa's Mathematica > Navigator version 3. I'm getting an error message. > > Here's what I am introducing: > > mandelbrot = Compile[{{c,_Complex}}, > Module[{z=0+0I, n=0}, While[Abs[z]<2 && n<50, z=z^2+c; n++]; n]]; > > DensityPlot[mandelbrot[x+Iy], {x,-2,1},{y,-1.5,1.5}, PlotPoints->200, > Mesh->False, FrameTicks->{{-2,-1,0,1},{-1,0,1}}]; //Timing > > I get the message: > > CompiledFunction::cfsa: > Argument -1.99998 + Iy at position 1 should be a machine-size complex > number. > > Where am I going wrong? > > Thanks. > > > > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:14:57 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 89B206BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:14:57 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNEwo1030519; Fri, 22 Jul 2011 18:14:58 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 76C1ABF4D2; Fri, 22 Jul 2011 18:14:58 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 8BD63BF4BA; Fri, 22 Jul 2011 18:14:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28691 for mathgroup-newout; Fri, 22 Jul 2011 19:47:56 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28685 for mathgroup-newsend; Fri, 22 Jul 2011 19:47:56 -0400 (EDT) Date: Fri, 22 Jul 2011 19:47:56 -0400 (EDT) Message-Id: <201107222347.TAA28685 at smc.vnet.net> From: =?iso-8859-1?Q?S=F6nmezer at smc.vnet.net, _D=2E?= <d.sonmezer at student.tue.nl> Subject: [mg120447] Code is not working... To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230314 Hello, I am in trouble with below codes: I run this code but Program is not finsh evertime It is running and running... Could you possible help me. dim = Dimensions[image] r = 1; k = 1; n = 10; cost = Function[{positionValues, neighborValues}, First[neighborValues] == 1]; (* Image that only contains the value zero *) imageNew = Table[0, {i, 1, dim[[1]]}, {j, 1, dim[[2]]}]; (* Walk through the rows of the image *) While[r < dim[[1]], (* Walk through the columns of the image*) k = 1; While[k < dim[[2]], (* Find a white pixel*) If[imgfilter[[r, k]] == 1, (* Proceed RegionGrowing and give them a identical value by \ multiplying it with n *) region = RegionGrowing[{imgfilter}, {{r, k}}, 1, cost]*n; (* Add the identical cell to imageNew *) imageNew = imageNew + region; (* Change n, so each cell has a different value *) n = n + 2; (* Take the cell out of the original image, so he will stop when there is no white pixel anymore *) imageFilled = imgfilter - region; ]; k++; ]; r++; ]; From mathgroup-adm at smc.vnet.net Fri Jul 22 18:16:10 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1DDDF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:16:10 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNGBe3031528; Fri, 22 Jul 2011 18:16:11 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 64A2CA8169; Fri, 22 Jul 2011 18:16:11 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 7B875A818F; Fri, 22 Jul 2011 18:16:09 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28602 for mathgroup-newout; Fri, 22 Jul 2011 19:45:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28597 for mathgroup-newsend; Fri, 22 Jul 2011 19:45:45 -0400 (EDT) Date: Fri, 22 Jul 2011 19:45:45 -0400 (EDT) Message-Id: <201107222345.TAA28597 at smc.vnet.net> From: Vince Virgilio <blueschi at gmail.com> Subject: [mg120435] Re: CDF limitations and unclear professional strategy Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230314 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1200_1299 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __INT_PROD_COMP 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. No complaints to WRI. And I am very glad that I can now create nbp/cdfs locally, without going through WRI's website. (Aside: This CDF player release confuses me a bit. Was the CDF player available before this release only a reader, without interactivity?) Nonetheless, dittos to P. Fonseca. The whole data management scheme stymies me. Some recent threads touch on this. Notebooks just aren't convenient containers for large amounts of data. Say, tens of MBs? Certainly the Notebook Save's become lethargic. And for much larger data volumes, I notice latencies in the Front End's refresh of the notebook. That might have been while scrolling, though not displaying large imagery. But that was a while ago. I've since stopped trying to keep so much data in notebooks, and am now trimming my problems/presentations to fit the format's obvious capabilities. My nagging suspicion is there are certain inefficiencies and limitations as sociated with Notebooks' encoding in text instead of binary. In a way, isn't Mathematica still character-based because of this? (Even though it eventually translates to something else represented by those characters, a la a universal computer.) Vince Virgilio From mathgroup-adm at smc.vnet.net Fri Jul 22 18:18:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id DCAD56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:18:51 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNIq1g000467; Fri, 22 Jul 2011 18:18:52 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 94AF2BF4BA; Fri, 22 Jul 2011 18:18:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id AD05DBF4B9; Fri, 22 Jul 2011 18:18:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28590 for mathgroup-newout; Fri, 22 Jul 2011 19:45:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28585 for mathgroup-newsend; Fri, 22 Jul 2011 19:45:24 -0400 (EDT) Date: Fri, 22 Jul 2011 19:45:24 -0400 (EDT) Message-Id: <201107222345.TAA28585 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120433] Re: How Can I Include a Button in a Manipulate References: <201107220107.VAA16785 at smc.vnet.net> <4E2910D8.9080302 at tue.nl> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.231214 Hello Fred, Good point, and that appears to have come up in some of the other responses. I use Manipulate only because I am most familiar with it. Now it looks like it's time to work through the tutorials on some of the lower level functions! Gregory On Fri, Jul 22, 2011, at 1:55 AM, Fred Simons wrote: > Hi Gregory, > > Not an answer, just a question (or suggestion): why do you use Manipulate? My experience is that for the things you seem to want to do you are much more flexible when you use the functions one level lower than Manipulate: DynamicModule for the interactivity and Grid for the layout. You can place the button in any field of the grid you like. > > Best wishes, > > Fred > > Op 22-7-2011 3:07, Gregory Lypny schreef: >> Hello everyone, >> >> I have a Manipulate that generates a random integer or integers >> depending on the user's choice of parameters in a number of setter >> bars. I'd like to include a button in the Manipulate's output pane >> that allows the user to generate a new result by generating a new random >> number while keeping all of the parameters in the setter bar the same. >> Can that be done? >> >> >> Regards, >> >> Gregory >> >> >> >> ----- >> Geen virus gevonden in dit bericht. >> Gecontroleerd door AVG - www.avg.com >> Versie: 10.0.1390 / Virusdatabase: 1518/3778 - datum van uitgifte: 07/21/11 >> >> >> > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:20:10 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 129C06BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:20:10 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNKBt0003393; Fri, 22 Jul 2011 18:20:11 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 4DD7FBF417; Fri, 22 Jul 2011 18:20:11 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A54A4A818F; Fri, 22 Jul 2011 18:20:09 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28683 for mathgroup-newout; Fri, 22 Jul 2011 19:47:45 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28676 for mathgroup-newsend; Fri, 22 Jul 2011 19:47:45 -0400 (EDT) Date: Fri, 22 Jul 2011 19:47:45 -0400 (EDT) Message-Id: <201107222347.TAA28676 at smc.vnet.net> From: "DaleJenk" <dale.jenkins8 at deletegooglemail.com> Subject: [mg120446] Re: mandelbrot in version 7 & Ruskeepaa version 3 References: <j0aivf$ghq$1 at smc.vnet.net> <j0b9l4$jjj$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.230615 Many thanks - to you, and to the people who replied to me privately. "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> wrote in message news:j0b9l4$jjj$1 at smc.vnet.net... > There is a space missing between I and y in the expression mandelbrot[x + > Iy] (should be mandelbrot[x + I y]). Also, you should omit the semicolon > after DensityPlot, otherwise the plot will not be shown. > > Incidentally, tabulating the values and then plotting them with ArrayPlot > is faster for this example than using DensityPlot. That is, > > ArrayPlot@Table[ > mandelbrot[x + I y], > {y, -1.5, 1.5, 0.005}, {x, -2.0, 1.0, 0.005} > ] > > On Fri, 22 Jul 2011 02:15:27 +0100, DaleJenk > <dale.jenkins8 at deletegooglemail.com> wrote: > >> I bought Mathematica 7 Home Edition last year. I'm trying to plot the >> Mandelbrot Set following the instructions in Ruskeepaa's Mathematica >> Navigator version 3. I'm getting an error message. >> >> Here's what I am introducing: >> >> mandelbrot = Compile[{{c,_Complex}}, >> Module[{z=0+0I, n=0}, While[Abs[z]<2 && n<50, z=z^2+c; n++]; n]]; >> >> DensityPlot[mandelbrot[x+Iy], {x,-2,1},{y,-1.5,1.5}, PlotPoints->200, >> Mesh->False, FrameTicks->{{-2,-1,0,1},{-1,0,1}}]; //Timing >> >> I get the message: >> >> CompiledFunction::cfsa: >> Argument -1.99998 + Iy at position 1 should be a machine-size complex >> number. >> >> Where am I going wrong? >> >> Thanks. >> > From mathgroup-adm at smc.vnet.net Fri Jul 22 18:22:00 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D13D76BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:22:00 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNM2pF004661; Fri, 22 Jul 2011 18:22:02 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 1D64ABF4D7; Fri, 22 Jul 2011 18:22:02 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 2CC0AA813D; Fri, 22 Jul 2011 18:22:00 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28530 for mathgroup-newout; Fri, 22 Jul 2011 19:44:52 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28525 for mathgroup-newsend; Fri, 22 Jul 2011 19:44:52 -0400 (EDT) Date: Fri, 22 Jul 2011 19:44:52 -0400 (EDT) Message-Id: <201107222344.TAA28525 at smc.vnet.net> From: DANA DELOUIS <dana.del at gmail.com> Subject: [mg120430] Re: FinancialData still broken To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.231214 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ALLCAPS 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P5 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __LINES_OF_YELLING 0, __MIME_TEXT_ONLY 0, __PHISH_SPEAR_STRUCTURE_2 0, __SANE_MSGID 0, __STOCK_PHRASE_6 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. ...> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8... Hi. This function has lots of problems. In addition to the problems you point out, here's a slightly different view. Sometimes the Price, and Latest Price match. Other times, the Price is corrupt, but the latest price is correct, and sometimes it's the other way around. Sometimes the CIK codes or Exchange are missing, etc. Other issues are bugs in Option pricing, etc. I really hope they fix this soon, but I guess they never issue bug fixes. stocks={"ACEIX","FCNTX","JACNX","JANFX","JANWX","JMSCX","JNGIX","JNGLX", "JNMCX=94, "JNOSX","JNSGX","JNSTX","PTTAX","RGACX","STRFX=94}; Transpose[ { Map[FinancialData[#,"Price"]&,stocks], Map[FinancialData[#,"LatestTrade"]&,stocks], Map[FinancialData[#,"CIK"]&,stocks], Map[FinancialData[#,"Company"]&,stocks] }][[;;6]] < Just the first 6 for posting < Looks better in MatrixForm, or something similar...> {5.0324*10^8,{Missing[NotAvailable],5.0324*10^8},0000080832,Van Kampen Equity Income Fund A} {5.0311*10^8,{{2011,7,20,17,11,0.},72.17},0000024238,Fidelity Contra Fund} {13.97,{{2011,7,20,17,50,0.},13.97},0000277751,Janus Contrarian Fund D Shares} {5.0324*10^8,{{2001,12,22,20,42,0.},5.0324*10^8},0000277751,Janus Flexible Bond Fund D Shar} {5.0324*10^8,{{2011,7,20,18,24,0.},46.74},0000277751,Janus Worldwide Fund D Shares} {12.48,{{2011,7,20,17,51,0.},12.48},Missing[NotAvailable],Janus Smart Portfolio Conservat} = = = = = = = = = = Dana DeLouis $Version 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: > Erroneous prices are randomly returned: > > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > "PTTAX", "RGACX", "STRFX"} > > {8.81, 72.4, 14., 10.64, 46.49, 12.48, > 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, > 5.03241*10^8, 11.04, 31.44, 32.47} > > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > "PTTAX", "RGACX", "STRFX"} > > {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, > 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, > 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} > > Bobby > > -- > DrMajor... at yahoo.com From mathgroup-adm at smc.vnet.net Fri Jul 22 18:22:51 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BD5EA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 22 Jul 2011 18:22:51 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6MNMqN5004786; Fri, 22 Jul 2011 18:22:52 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id A0407BF4B9; Fri, 22 Jul 2011 18:22:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C12D5BF417; Fri, 22 Jul 2011 18:22:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28596 for mathgroup-newout; Fri, 22 Jul 2011 19:45:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA28591 for mathgroup-newsend; Fri, 22 Jul 2011 19:45:35 -0400 (EDT) Date: Fri, 22 Jul 2011 19:45:35 -0400 (EDT) Message-Id: <201107222345.TAA28591 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120434] Re: How Can I Include a Button in a Manipulate References: <5165123.71643.1311294303544.JavaMail.root@m06> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.22.231214 Thank you, David. I will check it out. Where can I find the Presentations application? Gregory On Thu, Jul 21, 2011, at 8:59 PM, David Park wrote: > Gregory, > > I'm not certain how easy it is to do with Manipulate, but it is certainly > possible to do it with a custom dynamic display. I find custom dynamic > displays much easier to write because you can format them any way you wish > without having to override defaults. > > The Presentations application, in the PlaneGeometry section, has a tutorial > that shows how to write custom dynamics, including one example with a button > that performs an action on the displayed dynamic. > > The trick is to think of primary dynamic variables (operated by controls) > and secondary dynamic variables that depend on the primary variables. Write > a routine, or routines, that calculate the secondary variables from the > primary variables. Invoke these by using the second argument in the Dynamic > statement. The random number could be an initially set primary variable. The > button could then regenerate it and recalculate all the secondary variables. > > > David Park > djmpark at comcast.net > http://home.comcast.net/~djmpark/ > > > > > From: Gregory Lypny [mailto:gregory.lypny at videotron.ca] > > > Hello everyone, > > I have a Manipulate that generates a random integer or integers > depending on the user's choice of parameters in a number of setter > bars. I'd like to include a button in the Manipulate's output pane > that allows the user to generate a new result by generating a new random > number while keeping all of the parameters in the setter bar the same. > Can that be done? > > > Regards, > > Gregory > From mathgroup-adm at smc.vnet.net Sat Jul 23 00:35:53 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 076216BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 00:35:52 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6N5ZrM0009440; Sat, 23 Jul 2011 00:35:54 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id CBA00A8195; Sat, 23 Jul 2011 00:35:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 298C9A818D; Sat, 23 Jul 2011 00:35:52 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id CAA01708 for mathgroup-newout; Sat, 23 Jul 2011 02:29:21 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id CAA01702 for mathgroup-newsend; Sat, 23 Jul 2011 02:29:20 -0400 (EDT) Date: Sat, 23 Jul 2011 02:29:20 -0400 (EDT) Message-Id: <201107230629.CAA01702 at smc.vnet.net> From: "Scot T. Martin" <smartin at seas.harvard.edu> Subject: [mg120450] call Fortran subroutine from Mathematica // use NETLink and DLL To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.52414 This post explains how to call a Fortran subroutine as a DLL from Mathematica. I don't think the hints in this post exist in explicit form in the Wolfram documentation or in the MathArchive, at least so far as I could find. There is information in a post from Wolfram for how to use Mathlink via C wrappers to get to Fortran subroutines (version 3 of Mathematica? http://library.wolfram.com/infocenter/TechNotes/174/). *BUT* I think since the introduction of NETLink into Mathematica (version 6?), the matter is now much more straightforward, at least in a Windows environment. The purpose of this post is therefore to a future user who might want to follow what I have done. >From Windows7, 64-bit, and using the gnu compiler (http://gcc.gnu.org/wiki/GFortranUsage), here is the trace of the CMD commands: C:\Demo>dir 22-Jul-11 21:16 336 SumAndDifference.f90 C:\Demo>more SumAndDifference.f90 subroutine sum_and_difference(i,j,resultArray) implicit none integer*4, intent (in) :: i integer*4, intent (in) :: j integer*4, dimension(2), intent (out) :: resultArray resultArray(1) = i + j resultArray(2) = i - j return end subroutine sum_and_difference C:\Demo>gfortran -c SumAndDifference.f90 C:\Demo>gfortran -s -shared -mrtd -o SumAndDifference.dll SumAndDifference. o C:\Demo>dir 22-Jul-11 21:21 12,800 SumAndDifference.dll 22-Jul-11 21:16 336 SumAndDifference.f90 22-Jul-11 21:20 429 SumAndDifference.o Now follows the Mathematica part: In[1]:= Needs["NETLink`"] In[2]:= SetDirectory@NotebookDirectory[] Out[2]= "C:\\MyFortran" In[3]:= $pathToDLL = FileNameJoin[{Directory[], "SumAndDifference.dll"}] Out[3]= "C:\\MyFortran\\SumAndDifference.dll" [To understand below, read: http://www.wolfram.com/learningcenter/tutorialcollection/NETLinkUserGuide/ ] [Note addition of "_" to "sum_and_difference" that is done by compiler.] In[4]:= SumAndDifference = DefineDLLFunction["sum_and_difference_", $pathToDLL, "void", {"Int32*", "Int32*", "Int32[]"}] In[5]:= results = MakeNETObject[{0, 0}, "System.Int32[]"] In[6]:= SumAndDifference[10, 20, results] In[7]:= NETObjectToExpression@results Out[7]= {30, -10} From mathgroup-adm at smc.vnet.net Sat Jul 23 00:36:56 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 951546BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 00:36:56 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6N5av2R009502; Sat, 23 Jul 2011 00:36:57 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id BD628FF004; Sat, 23 Jul 2011 00:36:57 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 4A43BA8195; Sat, 23 Jul 2011 00:36:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id CAA01701 for mathgroup-newout; Sat, 23 Jul 2011 02:29:10 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id CAA01696 for mathgroup-newsend; Sat, 23 Jul 2011 02:29:09 -0400 (EDT) Date: Sat, 23 Jul 2011 02:29:09 -0400 (EDT) Message-Id: <201107230629.CAA01696 at smc.vnet.net> From: James Stein <mathgroup at stein.org> Subject: [mg120449] Re: FinancialData still broken References: <201107222344.TAA28525 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.52414 DANA DELOUIS wrote: I really hope they fix this soon, but I guess they never issue bug fixes. Are these bugs in Mathematica, or bugs in Yahoo? FWIW, I do not see the bug reported by the OP (DrMajorBob). On Fri, Jul 22, 2011 at 4:44 PM, DANA DELOUIS <dana.del at gmail.com> wrote: > ...> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8... > > Hi. This function has lots of problems. > In addition to the problems you point out, here's a slightly different > view. > Sometimes the Price, and Latest Price match. > Other times, the Price is corrupt, but the latest price is correct, and > sometimes it's the other way around. > Sometimes the CIK codes or Exchange are missing, etc. > Other issues are bugs in Option pricing, etc. > I really hope they fix this soon, but I guess they never issue bug fixes. > > > stocks={"ACEIX","FCNTX","JACNX","JANFX","JANWX","JMSCX","JNGIX","JNGLX", > "JNMCX=94, > "JNOSX","JNSGX","JNSTX","PTTAX","RGACX","STRFX=94}; > > Transpose[ > { > Map[FinancialData[#,"Price"]&,stocks], > Map[FinancialData[#,"LatestTrade"]&,stocks], > Map[FinancialData[#,"CIK"]&,stocks], > Map[FinancialData[#,"Company"]&,stocks] > }][[;;6]] > > < Just the first 6 for posting > < Looks better in MatrixForm, or something similar...> > > {5.0324*10^8,{Missing[NotAvailable],5.0324*10^8},0000080832,Van Kampen > Equity Income Fund A} > {5.0311*10^8,{{2011,7,20,17,11,0.},72.17},0000024238,Fidelity Contra Fund} > {13.97,{{2011,7,20,17,50,0.},13.97},0000277751,Janus Contrarian Fund D > Shares} > {5.0324*10^8,{{2001,12,22,20,42,0.},5.0324*10^8},0000277751,Janus Flexible > Bond Fund D Shar} > {5.0324*10^8,{{2011,7,20,18,24,0.},46.74},0000277751,Janus Worldwide Fund D > Shares} > {12.48,{{2011,7,20,17,51,0.},12.48},Missing[NotAvailable],Janus Smart > Portfolio Conservat} > > = = = = = = = = = = > Dana DeLouis > $Version > 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) > > > On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: > > Erroneous prices are randomly returned: > > > > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > > "PTTAX", "RGACX", "STRFX"} > > > > {8.81, 72.4, 14., 10.64, 46.49, 12.48, > > 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, > > 5.03241*10^8, 11.04, 31.44, 32.47} > > > > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > > "PTTAX", "RGACX", "STRFX"} > > > > {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, > > 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, > > 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} > > > > Bobby > > > > -- > > DrMajor... at yahoo.com > > > > From mathgroup-adm at smc.vnet.net Sat Jul 23 00:38:44 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 354806BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 00:38:44 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6N5cjLQ009604; Sat, 23 Jul 2011 00:38:45 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 177C8A8195; Sat, 23 Jul 2011 00:38:45 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 5E268A8194; Sat, 23 Jul 2011 00:38:43 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id CAA01694 for mathgroup-newout; Sat, 23 Jul 2011 02:28:59 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id CAA01688 for mathgroup-newsend; Sat, 23 Jul 2011 02:28:58 -0400 (EDT) Date: Sat, 23 Jul 2011 02:28:58 -0400 (EDT) Message-Id: <201107230628.CAA01688 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120448] Re: FinancialData still broken Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.53022 I'm used to some of these problems, and I wrote code to try something else when Missing comes back. This is the first time I've seen prices on the order of 5 x 10^8. And so... I've coded an infinite loop to call over and over (on each stock) until I get a price less than 10^8. I may never get rid of that kludge, since it doesn't hurt anything unless it's TRULY infinite, or semi-infinite, if you will. So far, the error seems truly random, so it only takes an extra call or two to get past it. I don't think there's a problem in Mathematica on our machines. It's probably a problem at the curated database end of things, and if so, there couldn't be a bug fix. Bobby On Fri, 22 Jul 2011 18:44:52 -0500, DANA DELOUIS <dana.del at gmail.com> wrote: > ...> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8... > > Hi. This function has lots of problems. > In addition to the problems you point out, here's a slightly different > view. > Sometimes the Price, and Latest Price match. > Other times, the Price is corrupt, but the latest price is correct, and > sometimes it's the other way around. > Sometimes the CIK codes or Exchange are missing, etc. > Other issues are bugs in Option pricing, etc. > I really hope they fix this soon, but I guess they never issue bug fixes. > > > stocks={"ACEIX","FCNTX","JACNX","JANFX","JANWX","JMSCX","JNGIX","JNGLX", > "JNMCX=94, > "JNOSX","JNSGX","JNSTX","PTTAX","RGACX","STRFX=94}; > > Transpose[ > { > Map[FinancialData[#,"Price"]&,stocks], > Map[FinancialData[#,"LatestTrade"]&,stocks], > Map[FinancialData[#,"CIK"]&,stocks], > Map[FinancialData[#,"Company"]&,stocks] > }][[;;6]] > > < Just the first 6 for posting > < Looks better in MatrixForm, or something similar...> > > {5.0324*10^8,{Missing[NotAvailable],5.0324*10^8},0000080832,Van Kampen > Equity Income Fund A} > {5.0311*10^8,{{2011,7,20,17,11,0.},72.17},0000024238,Fidelity Contra > Fund} > {13.97,{{2011,7,20,17,50,0.},13.97},0000277751,Janus Contrarian Fund D > Shares} > {5.0324*10^8,{{2001,12,22,20,42,0.},5.0324*10^8},0000277751,Janus > Flexible Bond Fund D Shar} > {5.0324*10^8,{{2011,7,20,18,24,0.},46.74},0000277751,Janus Worldwide > Fund D Shares} > {12.48,{{2011,7,20,17,51,0.},12.48},Missing[NotAvailable],Janus Smart > Portfolio Conservat} > > = = = = = = = = = = > Dana DeLouis > $Version > 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) > > > On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: >> Erroneous prices are randomly returned: >> >> FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", >> "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", >> "PTTAX", "RGACX", "STRFX"} >> >> {8.81, 72.4, 14., 10.64, 46.49, 12.48, >> 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, >> 5.03241*10^8, 11.04, 31.44, 32.47} >> >> FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", >> "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", >> "PTTAX", "RGACX", "STRFX"} >> >> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, >> 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, >> 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} >> >> Bobby >> >> -- >> DrMajor... at yahoo.com > > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sat Jul 23 18:00:20 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A8A2E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:00:20 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN0LQd007468; Sat, 23 Jul 2011 18:00:21 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 49CD1A8158; Sat, 23 Jul 2011 18:00:21 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id CF891A813D; Sat, 23 Jul 2011 18:00:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08684 for mathgroup-newout; Sat, 23 Jul 2011 19:53:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08679 for mathgroup-newsend; Sat, 23 Jul 2011 19:53:12 -0400 (EDT) Date: Sat, 23 Jul 2011 19:53:12 -0400 (EDT) Message-Id: <201107232353.TAA08679 at smc.vnet.net> From: Markus <markus.seywerd at seywerd.com> Subject: [mg120453] CDF Files Break when being mailed or uploaded To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.224516 Hi I have created a Computable Document File with a Barchart. When I transfer the file to a machine using a flash drive or over the office network the receiver can read the file with the CDF reader and everything looks good. However if I email or ftp the file to another location the barchart is broken. Does anyone have any ideas? From mathgroup-adm at smc.vnet.net Sat Jul 23 18:00:56 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1B12D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:00:56 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN0rfn007535; Sat, 23 Jul 2011 18:00:53 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 6056EA813D; Sat, 23 Jul 2011 18:00:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 68D8BFF003; Sat, 23 Jul 2011 18:00:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08690 for mathgroup-newout; Sat, 23 Jul 2011 19:53:23 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08685 for mathgroup-newsend; Sat, 23 Jul 2011 19:53:22 -0400 (EDT) Date: Sat, 23 Jul 2011 19:53:22 -0400 (EDT) Message-Id: <201107232353.TAA08685 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120454] Re: Code is not working... References: <201107222347.TAA28685 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.224516 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1400_1499 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_MEDIA_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. If you want any useful help you'll probably need to give a bit more information. For example, what are image, RegionGrowing and imgfilter? And what is the function of imageFilled (it doesn't seem to do anything at the moment)? Heike. On 23 Jul 2011, at 00:47, =?iso-8859-1?Q?S=F6nmezer at smc.vnet.net wrote: > > Hello, > > I am in trouble with below codes: > > I run this code but Program is not finsh evertime It is running and running... > Could you possible help me. > > dim = Dimensions[image] > r = 1; > k = 1; > n = 10; > cost = Function[{positionValues, neighborValues}, > First[neighborValues] == 1]; > > (* Image that only contains the value zero *) > imageNew = Table[0, {i, 1, dim[[1]]}, {j, 1, dim[[2]]}]; > > (* Walk through the rows of the image *) > While[r < dim[[1]], > (* Walk through the columns of the image*) > k = 1; > While[k < dim[[2]], > (* Find a white pixel*) > If[imgfilter[[r, k]] == 1, > (* Proceed RegionGrowing and give them a identical value by \ > multiplying it with n *) > region = RegionGrowing[{imgfilter}, {{r, k}}, 1, cost]*n; > (* Add the identical cell to imageNew *) > imageNew = imageNew + region; > (* Change n, so each cell has a different value *) > n = n + 2; > (* Take the cell out of the original image, > so he will stop when there is no white pixel anymore *) > imageFilled = imgfilter - region; > ]; > k++; > ]; > r++; > ]; > > From mathgroup-adm at smc.vnet.net Sat Jul 23 18:01:15 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6BF606BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:01:15 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN13BD007601; Sat, 23 Jul 2011 18:01:03 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 6CF80A815B; Sat, 23 Jul 2011 18:01:03 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 1181BA813D; Sat, 23 Jul 2011 18:00:54 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08668 for mathgroup-newout; Sat, 23 Jul 2011 19:53:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08658 for mathgroup-newsend; Sat, 23 Jul 2011 19:53:01 -0400 (EDT) Date: Sat, 23 Jul 2011 19:53:01 -0400 (EDT) Message-Id: <201107232353.TAA08658 at smc.vnet.net> From: "Dr. Robert Kragler" <kragler at hs-weingarten.de> Subject: [mg120452] Editing/modifying palettes Reply-To: kragler at hs-weingarten.de To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.225114 My question ist : How can I merge resp. copy some useful buttons from one palette into another one? I am aware that there exists a thread "How edit a saved palette?" [mg85234], but the recipes given do not really work with Mathematica V7. Any suggestions are appreciated. Robert Kragler Email : kragler at hs-weingarten.de URL : http://portal.hs-weingarten.de/web/kragler From mathgroup-adm at smc.vnet.net Sat Jul 23 18:02:49 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 991AF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:02:49 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN2o4f008107; Sat, 23 Jul 2011 18:02:50 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 735D7FF003; Sat, 23 Jul 2011 18:02:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E9532A813D; Sat, 23 Jul 2011 18:02:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08724 for mathgroup-newout; Sat, 23 Jul 2011 19:54:17 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08719 for mathgroup-newsend; Sat, 23 Jul 2011 19:54:16 -0400 (EDT) Date: Sat, 23 Jul 2011 19:54:16 -0400 (EDT) Message-Id: <201107232354.TAA08719 at smc.vnet.net> From: "Harvey P. Dale" <hpd1 at nyu.edu> Subject: [mg120459] From Reduce to List To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.225114 What is the easiest and most efficient way to transform the output from Reduce into a list of values? For example, if Reduce produces (a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004= &&b==251000) and I want {{1001,1001000},{1002,501000},{1004,251000}}, what is the best way to go from the former to the latter? Harvey Harvey P. Dale University Professor of Philanthropy and the Law Director, National Center on Philanthropy and the Law 139 MacDougal Street New York, N.Y. 10012-1076 Tel: 212-998-6161 Fax: 212-995-3149 From mathgroup-adm at smc.vnet.net Sat Jul 23 18:04:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1892F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:04:50 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN4pY7008466; Sat, 23 Jul 2011 18:04:51 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id EA2E1FF006; Sat, 23 Jul 2011 18:04:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id A6FEEFF008; Sat, 23 Jul 2011 18:04:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08717 for mathgroup-newout; Sat, 23 Jul 2011 19:54:06 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08712 for mathgroup-newsend; Sat, 23 Jul 2011 19:54:06 -0400 (EDT) Date: Sat, 23 Jul 2011 19:54:06 -0400 (EDT) Message-Id: <201107232354.TAA08712 at smc.vnet.net> From: "Ted Sariyski" <tsariysk at craft-tech.com> Subject: [mg120458] how to ListPlot3D large data sets References: <201107222344.TAA28525 at smc.vnet.net> <201107230628.CAA01688 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.225414 Hi, I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a data set with many millions of records. I was not able to get an image from the full dataset, it takes forever. If I use e.g. every fifth record, although slow, I get an image. The machine running Mathematica is Windows 7 (64 bit), has 24 GB RAM and there was no swapping. I wonder what is considered as a reasonable data size for ListPlot3D and are there other tools in Mathematica for visualization of large data sets? Thanks in advance, --Ted From mathgroup-adm at smc.vnet.net Sat Jul 23 18:07:00 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BC6426BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:06:59 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN70Fn008646; Sat, 23 Jul 2011 18:07:01 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 01C81FF003; Sat, 23 Jul 2011 18:07:01 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 43436A818E; Sat, 23 Jul 2011 18:06:54 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08653 for mathgroup-newout; Sat, 23 Jul 2011 19:52:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08648 for mathgroup-newsend; Sat, 23 Jul 2011 19:52:50 -0400 (EDT) Date: Sat, 23 Jul 2011 19:52:50 -0400 (EDT) Message-Id: <201107232352.TAA08648 at smc.vnet.net> From: paulvonhippel at yahoo <paulvonhippel at yahoo.com> Subject: [mg120451] random variables To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.221214 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_600_699 0, BODY_SIZE_7000_LESS 0, FROM_NAME_PHRASE 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I would like to define a symbol representing a random variable, and then use that symbol in other expressions. It's not clear to me how to do that. For example, when I type the following input -- U = ChiSquareDistribution[n - 1] V = 2*U W = 3*U Mean[V] Mean[W] -- I do not get the mean of the random variables V and W. I know I can get the desired answer by typing: V = TransformedDistribution[2*U, U \[Distributed] ChiSquareDistribution[n - 1]] W = TransformedDistribution[3*U, U \[Distributed] ChiSquareDistribution[n - 1]] Mean[V] Mean[W] But that requires me to redefine the distribution of U every time I need it. Is there a way to define U just once? From mathgroup-adm at smc.vnet.net Sat Jul 23 18:09:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D64246BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:09:18 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NN9JR8010110; Sat, 23 Jul 2011 18:09:19 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id B0929FF004; Sat, 23 Jul 2011 18:09:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 1AF80A813D; Sat, 23 Jul 2011 18:09:15 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08697 for mathgroup-newout; Sat, 23 Jul 2011 19:53:34 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08692 for mathgroup-newsend; Sat, 23 Jul 2011 19:53:33 -0400 (EDT) Date: Sat, 23 Jul 2011 19:53:33 -0400 (EDT) Message-Id: <201107232353.TAA08692 at smc.vnet.net> From: Murray Eisenberg <murray at math.umass.edu> Subject: [mg120455] Re: Producing an image that only contains its interior and boundary but, no exterior. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.230016 How did you discover that option for Show? I find no entry for "ShrinkWrap" in the Documentation Center, see no mention of that option value on the page for Show. On the Graphics3D ref page, the option Method is listed in the More Information section, but that Method option is not listed in the Options section of Examples. And of course the ref page for Method is essentially useless in such a case. It's long been a documentation lacuna that there are no "inverse references" for such options as Method that apply to multiple functions -- from the general option such as Method back to all the functions for which it's an option, along with some information as to what settings are allowed for each such function (at least in cases where within the target function page itself the settings are not all listed). On 7/22/11 7:47 PM, Yves Klett wrote: > g = Graphics3D[Cuboid[], SphericalRegion -> True] > > Show[g, Method -> {"ShrinkWrap" -> True}] -- Murray Eisenberg murray at math.umass.edu Mathematics & Statistics Dept. Lederle Graduate Research Tower phone 413 549-1020 (H) University of Massachusetts 413 545-2859 (W) 710 North Pleasant Street fax 413 545-1801 Amherst, MA 01003-9305 From mathgroup-adm at smc.vnet.net Sat Jul 23 18:11:02 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 38F5C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:11:02 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NNB3o2013626; Sat, 23 Jul 2011 18:11:03 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id A5060FF004; Sat, 23 Jul 2011 18:11:02 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D52B0FF003; Sat, 23 Jul 2011 18:10:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08711 for mathgroup-newout; Sat, 23 Jul 2011 19:53:56 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08706 for mathgroup-newsend; Sat, 23 Jul 2011 19:53:55 -0400 (EDT) Date: Sat, 23 Jul 2011 19:53:55 -0400 (EDT) Message-Id: <201107232353.TAA08706 at smc.vnet.net> From: Bill Rowe <readnews at sbcglobal.net> Subject: [mg120457] Re: TransformedDistribution, for a sum of M iid variables To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.230016 On 7/22/11 at 3:42 AM, paulvonhippel at yahoo.com (Paul von Hippel) wrote: >Thanks for the neat proof. Sorry I wasn't clear about my goals. I >want to include a sum of iid variables in a TransfornedDistribution, >and then calculate the Mean and Variance of the distribution. >The iid variables need not be normal, and the TrasformedDistribution >will contain other variables besides the iid sum. While it is possible to do this using TransformedDistribution, I think it is far easier to to what you want with the various generating functions built into Mathematica. Use the exponential distribution as an example. For the exponential distribution: In[2]:= mg = CumulantGeneratingFunction[ExponentialDistribution[a], t] Out[2]= Log[a/(a - t)] Cumulants sum. So, the cumulant generating function for the sum n exponential deviates is simply n times the cumulant generating function of the original exponential distribution. And the mean is the first derivative of the cumulant generating function evaluated at t = 0. So, the mean of the sum of n exponential deviates is: In[3]:= D[n mg, t] /. t -> 0 Out[3]= n/a And the variance is given by the second derivative. So, the desired variance is: In[4]:= D[n mg, {t, 2}] /. t -> 0 Out[4]= n/a^2 And to check the validity of the above, note: In[5]:= MomentGeneratingFunction[ExponentialDistribution[a], t] Out[5]= a/(a - t) In[8]:= MomentGeneratingFunction[GammaDistribution[n, 1/a], t] Out[8]= (1 - t/a)^(-n) That is, the sum of n exponential deviates is distributed as a gamma distribution with parameters n, 1/a. So, In[9]:= Mean[GammaDistribution[n, 1/a]] Out[9]= n/a In[10]:= Variance[GammaDistribution[n, 1/a]] Out[10]= n/a^2 which verifies the earlier result using the cumulant generating function. Note, this technique of using generating functions does not require the sum to be of identically distributed values. I could just as easily find the mean and variance of say the sum of an exponential deviate and the sum of a normal deviate using this technique. From mathgroup-adm at smc.vnet.net Sat Jul 23 18:12:54 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 26DE76BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 23 Jul 2011 18:12:54 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6NNCsGZ016623; Sat, 23 Jul 2011 18:12:54 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 11BF0A813D; Sat, 23 Jul 2011 18:12:54 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 0C501FF006; Sat, 23 Jul 2011 18:12:51 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08705 for mathgroup-newout; Sat, 23 Jul 2011 19:53:45 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id TAA08700 for mathgroup-newsend; Sat, 23 Jul 2011 19:53:44 -0400 (EDT) Date: Sat, 23 Jul 2011 19:53:44 -0400 (EDT) Message-Id: <201107232353.TAA08700 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120456] Re: FinancialData still broken Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.23.230314 I usually don't see the "price > 10^8" bug, either. It may have been permanently gone by the time you looked for it. But it was there for a day or so. I know the occasional spurious Missing coming back is a months-old issue at least, and Dan Delouis confirmed it still exists. I've inoculated my code against both bugs, so I may not notice when they go away. Bobby On Sat, 23 Jul 2011 01:29:09 -0500, James Stein <mathgroup at stein.org> wrote: > > DANA DELOUIS wrote: > I really hope they fix this soon, but I guess they never issue bug fixes. > > Are these bugs in Mathematica, or bugs in Yahoo? > FWIW, I do not see the bug reported by the OP (DrMajorBob). > > > On Fri, Jul 22, 2011 at 4:44 PM, DANA DELOUIS <dana.del at gmail.com> wrote: > >> ...> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8... >> >> Hi. This function has lots of problems. >> In addition to the problems you point out, here's a slightly different >> view. >> Sometimes the Price, and Latest Price match. >> Other times, the Price is corrupt, but the latest price is correct, and >> sometimes it's the other way around. >> Sometimes the CIK codes or Exchange are missing, etc. >> Other issues are bugs in Option pricing, etc. >> I really hope they fix this soon, but I guess they never issue bug >> fixes. >> >> >> stocks={"ACEIX","FCNTX","JACNX","JANFX","JANWX","JMSCX","JNGIX","JNGLX", >> "JNMCX=94, >> "JNOSX","JNSGX","JNSTX","PTTAX","RGACX","STRFX=94}; >> >> Transpose[ >> { >> Map[FinancialData[#,"Price"]&,stocks], >> Map[FinancialData[#,"LatestTrade"]&,stocks], >> Map[FinancialData[#,"CIK"]&,stocks], >> Map[FinancialData[#,"Company"]&,stocks] >> }][[;;6]] >> >> < Just the first 6 for posting >> < Looks better in MatrixForm, or something similar...> >> >> {5.0324*10^8,{Missing[NotAvailable],5.0324*10^8},0000080832,Van Kampen >> Equity Income Fund A} >> {5.0311*10^8,{{2011,7,20,17,11,0.},72.17},0000024238,Fidelity Contra >> Fund} >> {13.97,{{2011,7,20,17,50,0.},13.97},0000277751,Janus Contrarian Fund D >> Shares} >> {5.0324*10^8,{{2001,12,22,20,42,0.},5.0324*10^8},0000277751,Janus >> Flexible >> Bond Fund D Shar} >> {5.0324*10^8,{{2011,7,20,18,24,0.},46.74},0000277751,Janus Worldwide >> Fund D >> Shares} >> {12.48,{{2011,7,20,17,51,0.},12.48},Missing[NotAvailable],Janus Smart >> Portfolio Conservat} >> >> = = = = = = = = = = >> Dana DeLouis >> $Version >> 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) >> >> >> On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: >> > Erroneous prices are randomly returned: >> > >> > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", >> > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", >> > "PTTAX", "RGACX", "STRFX"} >> > >> > {8.81, 72.4, 14., 10.64, 46.49, 12.48, >> > 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, >> > 5.03241*10^8, 11.04, 31.44, 32.47} >> > >> > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", >> > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", >> > "PTTAX", "RGACX", "STRFX"} >> > >> > {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, >> > 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, >> > 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} >> > >> > Bobby >> > >> > -- >> > DrMajor... at yahoo.com >> >> >> >> -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sun Jul 24 01:26:31 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id CB5B96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 01:26:30 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6O6QVxe015018; Sun, 24 Jul 2011 01:26:32 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 801DFA813D; Sun, 24 Jul 2011 01:26:31 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 5D747FF003; Sun, 24 Jul 2011 01:26:29 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11655 for mathgroup-newout; Sun, 24 Jul 2011 03:19:36 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11650 for mathgroup-newsend; Sun, 24 Jul 2011 03:19:35 -0400 (EDT) Date: Sun, 24 Jul 2011 03:19:35 -0400 (EDT) Message-Id: <201107240719.DAA11650 at smc.vnet.net> From: Simon <simonjtyler at gmail.com> Subject: [mg120463] Re: From Reduce to List Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.61214 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_10_99 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Reduce[expr, vars] vars /. ToRules[%] From mathgroup-adm at smc.vnet.net Sun Jul 24 01:26:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D87556BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 01:26:49 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6O6QpF6015033; Sun, 24 Jul 2011 01:26:51 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id F2C8BFF003; Sun, 24 Jul 2011 01:26:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 213DEA815B; Sun, 24 Jul 2011 01:26:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11647 for mathgroup-newout; Sun, 24 Jul 2011 03:19:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11642 for mathgroup-newsend; Sun, 24 Jul 2011 03:19:24 -0400 (EDT) Date: Sun, 24 Jul 2011 03:19:24 -0400 (EDT) Message-Id: <201107240719.DAA11642 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120462] Re: From Reduce to List Reply-To: drmajorbob at yahoo.com References: <201107232354.TAA08719 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.61214 (a == 1001 && b == 1001000) || (a == 1002 && b == 501000) || (a == 1004 && b == 251000) /. {Or -> List, And -> List, Equal[_, x_] :> x} {{1001, 1001000}, {1002, 501000}, {1004, 251000}} or expr = (a == 1001 && b == 1001000) || (a == 1002 && b == 501000) || (a == 1004 && b == 251000); {a, b} /. List[expr // ToRules] {{1001, 1001000}, {1002, 501000}, {1004, 251000}} Bobby On Sat, 23 Jul 2011 18:54:16 -0500, Harvey P. Dale <hpd1 at nyu.edu> wrote: > What is the easiest and most efficient way to transform the > output from Reduce into a list of values? For example, if Reduce > produces > (a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004= > &&b==251000) and I > want {{1001,1001000},{1002,501000},{1004,251000}}, what is the best way > to go from the former to the latter? > > Harvey > > Harvey P. Dale > University Professor of Philanthropy and the Law > Director, National Center on Philanthropy and the Law > 139 MacDougal Street > New York, N.Y. 10012-1076 > Tel: 212-998-6161 > Fax: 212-995-3149 > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sun Jul 24 01:27:06 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E15F96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 01:27:05 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6O6R7b2015060; Sun, 24 Jul 2011 01:27:07 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id EAE09A818A; Sun, 24 Jul 2011 01:27:06 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 0D31DA813D; Sun, 24 Jul 2011 01:27:03 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11667 for mathgroup-newout; Sun, 24 Jul 2011 03:19:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11662 for mathgroup-newsend; Sun, 24 Jul 2011 03:19:57 -0400 (EDT) Date: Sun, 24 Jul 2011 03:19:57 -0400 (EDT) Message-Id: <201107240719.DAA11662 at smc.vnet.net> From: paulvonhippel at yahoo <paulvonhippel at yahoo.com> Subject: [mg120465] TransformedDistribution -- odd problem To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.61214 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_500_599 0, BODY_SIZE_7000_LESS 0, FROM_NAME_PHRASE 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I'm having a very strange problem with TransformedDistribution, where I can calculate the mean of an F distribution but I cannot calculate the mean of a constant multiplied by an F distribution. That is, if I type Mean[TransformedDistribution[F, F \[Distributed] FRatioDistribution[v, v]]] Mathematica gives me an answer. But if I type Mean[TransformedDistribution[k*F , F \[Distributed] FRatioDistribution[v, v]]] Mathematica just echoes the input. I swear I got an answer for the second expression earlier today. What am I doing wrong? From mathgroup-adm at smc.vnet.net Sun Jul 24 01:29:03 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 5BD846BB19 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 01:29:03 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6O6T4af015203; Sun, 24 Jul 2011 01:29:04 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 8D53AFF004; Sun, 24 Jul 2011 01:29:04 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 13FB2A813D; Sun, 24 Jul 2011 01:28:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11661 for mathgroup-newout; Sun, 24 Jul 2011 03:19:47 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11656 for mathgroup-newsend; Sun, 24 Jul 2011 03:19:46 -0400 (EDT) Date: Sun, 24 Jul 2011 03:19:46 -0400 (EDT) Message-Id: <201107240719.DAA11656 at smc.vnet.net> From: Glenn Carlson <g.crlsn at gmail.com> Subject: [mg120464] NDSolve in matrix form To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.62114 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1100_1199 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I am trying to numerically solve systems of ODEs using Mathematica 7. The desired accuracy that I am striving for depends on the number of solution functions so I want to structure my solution algorithm to allow different numbers of solution functions. Solving the problem as a system of ODEs in matrix form seems the logical choice: dX/dt = f[X[t]], where f[X[t]] is a specified function, and X[t] is a vector of solution functions {x1[t],x2[t],...}. The initial conditions are specified by a vector X[0] = {x1[0],x2[0],...}. In my problem, the number of solution functions will usually vary from 3 to 7, but could be any number. One approach that doesn't work is: f := {f[[1]][t], f[[2]][t], f[[3]][t]} fInit := {0, 0, 2} mat := {(-3*f[[1]][t] - f[[2]][t]), 26.5*f[[1]][t] - f[[2]][t] - f[[1]][t]*f[[3]][t], f[[1]][t]*f[[2]][t] - f[[3]][t]} solution = NDSolve[{Derivative[1][f][t] == mat, f[0] == fInit}, f, {t, 0, 17}] I don't know if the problem is in the way f is specified or in my expression for NDSolve. I'd appreciate any assistance. Thanks and regards, Glenn From mathgroup-adm at smc.vnet.net Sun Jul 24 01:30:53 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 739346BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 01:30:53 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6O6UsCn015443; Sun, 24 Jul 2011 01:30:54 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 610B7A818A; Sun, 24 Jul 2011 01:30:54 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 9CA9DA815B; Sun, 24 Jul 2011 01:30:52 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11619 for mathgroup-newout; Sun, 24 Jul 2011 03:19:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11613 for mathgroup-newsend; Sun, 24 Jul 2011 03:19:03 -0400 (EDT) Date: Sun, 24 Jul 2011 03:19:03 -0400 (EDT) Message-Id: <201107240719.DAA11613 at smc.vnet.net> From: gcarlson <gcarlson at xannah.org> Subject: [mg120460] NDSolve in matrix form To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.61814 I am trying to numerically solve systems of ODEs using Mathematica 7. The desired accuracy that I am striving for depends on the number of solution functions so I want to structure my solution algorithm to allow different numbers of solution functions. Solving the problem as a system of ODEs in matrix form seems the logical choice: dX/dt = f[X[t]], where f[X[t]] is a specified function, and X[t] is a vector of solution functions {x1[t],x2[t],...}. The initial conditions are specified by a vector X[0] = {x1[0],x2[0],...}. In my problem, the number of solution functions will usually vary from 3 to 7, but could be any number. One approach that doesn't work is: f := {f[[1]][t], f[[2]][t], f[[3]][t]} fInit := {0, 0, 2} mat := {(-3*f[[1]][t] - f[[2]][t]), 26.5*f[[1]][t] - f[[2]][t] - f[[1]][t]*f[[3]][t], f[[1]][t]*f[[2]][t] - f[[3]][t]} solution = NDSolve[{Derivative[1][f][t] == mat, f[0] == fInit}, f, {t, 0, 17}] I don't know if the problem is in the way f is specified or in my expression for NDSolve. I'd appreciate any assistance. Thanks and regards, Glenn From mathgroup-adm at smc.vnet.net Sun Jul 24 01:33:13 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D0F7F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 01:33:12 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6O6XEe9015714; Sun, 24 Jul 2011 01:33:14 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id B7A27FF003; Sun, 24 Jul 2011 01:33:13 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C39ECA813D; Sun, 24 Jul 2011 01:33:11 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11640 for mathgroup-newout; Sun, 24 Jul 2011 03:19:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id DAA11635 for mathgroup-newsend; Sun, 24 Jul 2011 03:19:14 -0400 (EDT) Date: Sun, 24 Jul 2011 03:19:14 -0400 (EDT) Message-Id: <201107240719.DAA11635 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120461] Re: random variables Reply-To: drmajorbob at yahoo.com References: <201107232352.TAA08648 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.62114 U=ChiSquareDistribution[n-1]; twoU=TransformedDistribution[2*u,u\[Distributed]U]; Through[{Mean,Variance,PDF}@twoU] {2 (-1+n),8 (-1+n),Function[\[FormalX],\[Piecewise] (2^(1-n) \[FormalX]^(-1+1/2 (-1+n)) E^(-\[FormalX]/4))/Gamma[1/2 (-1+n)] \[FormalX]>0 0 True ,Listable]} Bobby On Sat, 23 Jul 2011 18:52:50 -0500, paulvonhippel at yahoo <paulvonhippel at yahoo.com> wrote: > I would like to define a symbol representing a random variable, and > then use that symbol in other expressions. It's not clear to me how to > do that. For example, when I type the following input -- > > U = ChiSquareDistribution[n - 1] > V = 2*U > W = 3*U > Mean[V] > Mean[W] > > -- I do not get the mean of the random variables V and W. I know I can > get the desired answer by typing: > > V = TransformedDistribution[2*U, > U \[Distributed] ChiSquareDistribution[n - 1]] > W = TransformedDistribution[3*U, > U \[Distributed] ChiSquareDistribution[n - 1]] > Mean[V] > Mean[W] > > But that requires me to redefine the distribution of U every time I > need it. > > Is there a way to define U just once? > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sun Jul 24 05:44:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A00836BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 05:44:19 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6OAiKk1020446; Sun, 24 Jul 2011 05:44:20 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 1B0B4A813D; Sun, 24 Jul 2011 05:44:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 868FBBF483; Sun, 24 Jul 2011 05:44:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13806 for mathgroup-newout; Sun, 24 Jul 2011 07:38:01 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13798 for mathgroup-newsend; Sun, 24 Jul 2011 07:38:00 -0400 (EDT) Date: Sun, 24 Jul 2011 07:38:00 -0400 (EDT) Message-Id: <201107241138.HAA13798 at smc.vnet.net> From: Fred Simons <f.h.simons at tue.nl> Subject: [mg120466] Re: From Reduce to List References: <201107232354.TAA08719 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.103314 In[8]:= expr=(a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004&&b==251000); {a,b}/.{ToRules[expr]} Out[9]= {{1001,1001000},{1002,501000},{1004,251000}} If expr is indeed the result of a Reduce command, I think it is very likely that instead of Reduce you could have used Solve (it has quite a lot of new features) in order to obtain the rules immediately. Kind regards, Fred Simons Eindhoven University of Technology Op 24-7-2011 1:54, Harvey P. Dale schreef: > What is the easiest and most efficient way to transform the > output from Reduce into a list of values? For example, if Reduce > produces > (a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004= > &&b==251000) and I > want {{1001,1001000},{1002,501000},{1004,251000}}, what is the best way > to go from the former to the latter? > > Harvey > > Harvey P. Dale > University Professor of Philanthropy and the Law > Director, National Center on Philanthropy and the Law > 139 MacDougal Street > New York, N.Y. 10012-1076 > Tel: 212-998-6161 > Fax: 212-995-3149 From mathgroup-adm at smc.vnet.net Sun Jul 24 05:44:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7E1DA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 05:44:48 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6OAinvC020466; Sun, 24 Jul 2011 05:44:49 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id B9134A813D; Sun, 24 Jul 2011 05:44:49 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 4881FBF4AE; Sun, 24 Jul 2011 05:44:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13823 for mathgroup-newout; Sun, 24 Jul 2011 07:38:24 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13819 for mathgroup-newsend; Sun, 24 Jul 2011 07:38:23 -0400 (EDT) Date: Sun, 24 Jul 2011 07:38:23 -0400 (EDT) Message-Id: <201107241138.HAA13819 at smc.vnet.net> From: Jay Bee <jiri.bocan at gmail.com> Subject: [mg120468] Re: CDF Files Break when being mailed or uploaded References: <j0fop8$8or$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.103314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 24, 1:25 am, Markus <markus.seyw... at seywerd.com> wrote: > Hi I have created a Computable Document File with a Barchart. When I > transfer the file to a machine using a flash drive or over the office > network the receiver can read the file with the CDF reader and > everything looks good. However if I email or ftp the file to another > location the barchart is broken. Does anyone have any ideas? Hi, Markus. Have you tried to send it archived? -jb- From mathgroup-adm at smc.vnet.net Sun Jul 24 05:47:37 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6C4E16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 05:47:37 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6OAlc9S021122; Sun, 24 Jul 2011 05:47:38 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id A07B3A815B; Sun, 24 Jul 2011 05:47:38 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C5278A813D; Sun, 24 Jul 2011 05:47:34 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13831 for mathgroup-newout; Sun, 24 Jul 2011 07:38:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13826 for mathgroup-newsend; Sun, 24 Jul 2011 07:38:34 -0400 (EDT) Date: Sun, 24 Jul 2011 07:38:34 -0400 (EDT) Message-Id: <201107241138.HAA13826 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120469] Re: From Reduce to List References: <201107232354.TAA08719 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.103314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __C230066_P5 0, __FRAUD_CONTACT_NUM 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You would use ToRules: {a, b} /. {ToRules[(a == 1001 && b == 1001000) || (a == 1002 && b == 501000) || (a == 1004 && b == 251000)]} out: {{1001, 1001000}, {1002, 501000}, {1004, 251000}} Heike On 24 Jul 2011, at 00:54, Harvey P. Dale wrote: > What is the easiest and most efficient way to transform the > output from Reduce into a list of values? For example, if Reduce > produces > (a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004= > &&b==251000) and I > want {{1001,1001000},{1002,501000},{1004,251000}}, what is the best way > to go from the former to the latter? > > Harvey > > Harvey P. Dale > University Professor of Philanthropy and the Law > Director, National Center on Philanthropy and the Law > 139 MacDougal Street > New York, N.Y. 10012-1076 > Tel: 212-998-6161 > Fax: 212-995-3149 > From mathgroup-adm at smc.vnet.net Sun Jul 24 05:48:10 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 68E6F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 05:48:10 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6OAmBRg021158; Sun, 24 Jul 2011 05:48:11 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 54810A815B; Sun, 24 Jul 2011 05:48:11 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 3015EBF4B0; Sun, 24 Jul 2011 05:48:09 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13817 for mathgroup-newout; Sun, 24 Jul 2011 07:38:13 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13812 for mathgroup-newsend; Sun, 24 Jul 2011 07:38:12 -0400 (EDT) Date: Sun, 24 Jul 2011 07:38:12 -0400 (EDT) Message-Id: <201107241138.HAA13812 at smc.vnet.net> From: Jay Bee <jiri.bocan at gmail.com> Subject: [mg120467] Re: Code is not working... References: <201107222347.TAA28685 at smc.vnet.net> <j0foq7$8ov$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.103314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1800_1899 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_MEDIA_BODY 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 24, 1:25 am, Heike Gramberg <heike.gramb... at gmail.com> wrote: > If you want any useful help you'll probably need to give a bit more > information. For example, what are > image, RegionGrowing and imgfilter? And what is the function of > imageFilled (it doesn't seem to do anything > at the moment)? > > Heike. > > On 23 Jul 2011, at 00:47, =?iso-8859-1?Q?S=F6nme... at smc.vnet.net wrot= e: > > > > > > > > > > > Hello, > > > I am in trouble with below codes: > > > I run this code but Program is not finsh evertime It is running and run= ning... > > Could you possible help me. > > > dim = Dimensions[image] > > r = 1; > > k = 1; > > n = 10; > > cost = Function[{positionValues, neighborValues}, > > First[neighborValues] == 1]; > > > (* Image that only contains the value zero *) > > imageNew = Table[0, {i, 1, dim[[1]]}, {j, 1, dim[[2]]}]; > > > (* Walk through the rows of the image *) > > While[r < dim[[1]], > > (* Walk through the columns of the image*) > > k = 1; > > While[k < dim[[2]], > > (* Find a white pixel*) > > If[imgfilter[[r, k]] == 1, > > (* Proceed RegionGrowing and give them a identical value by \ > > multiplying it with n *) > > region = RegionGrowing[{imgfilter}, {{r, k}}, 1, cost]*n; > > (* Add the identical cell to imageNew *) > > imageNew = imageNew + region; > > (* Change n, so each cell has a different value *) > > n = n + 2;As > > (* Take the cell out of the original image, > > so he will stop when there is no white pixel anymore *) > > imageFilled = imgfilter - region; > > ]; > > k++; > > ]; > > r++; > > ]; As Heike asked, what are those functions you use? If the computation lasts forever, there must be some bug... Check all braces - correct number and position, if all the inputs and outputs have an expected format, and so on... From mathgroup-adm at smc.vnet.net Sun Jul 24 05:48:57 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6DB5C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 24 Jul 2011 05:48:57 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6OAmw5q021225; Sun, 24 Jul 2011 05:48:58 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 4DD9DBF4B5; Sun, 24 Jul 2011 05:48:58 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 57B32BF4B0; Sun, 24 Jul 2011 05:48:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13838 for mathgroup-newout; Sun, 24 Jul 2011 07:38:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA13833 for mathgroup-newsend; Sun, 24 Jul 2011 07:38:45 -0400 (EDT) Date: Sun, 24 Jul 2011 07:38:45 -0400 (EDT) Message-Id: <201107241138.HAA13833 at smc.vnet.net> From: "Kevin J. McCann" <kjm at KevinMcCann.com> Subject: [mg120470] Re: NDSolve in matrix form References: <j0gh6t$bd4$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.103314 Glenn, First of all, you got into a recurrence problem with you definition of f. Second, the form of the input to NDSolve isn't quite right, you need to use Thread to transform something like {f1[t],f2[t],f3[t]}=={0,0,2} into {f1[t]==0,f2[t]==0,f3[t]==2} Take the code below apart and you will see how this is used. Finally, note that f3 does not enter the first two de's and that it is fairly simple to see that f1=f2=0. Here is my take: Clear[f,fInit,mat] f[t_]={f1[t],f2[t],f3[t]} fInit={0,0,2} mat={-3 f1[t]-f2[t],26.5 f1[t]-f2[t]-f1[t] f2[t],f1[t] f2[t]-f3[t]} eqns=Flatten[{Thread[(f^\[Prime])[t]==mat],Thread[f[0]==fInit]}] solution=NDSolve[eqns,f[t],{t,0,17}][[1]] Cheers, Kevin On 7/24/2011 3:22 AM, Glenn Carlson wrote: > I am trying to numerically solve systems of ODEs using Mathematica 7. > > The desired accuracy that I am striving for depends on the number of solution functions so I want to structure my solution algorithm to allow different numbers of solution functions. Solving the problem as a system of ODEs in matrix form seems the logical choice: > > dX/dt = f[X[t]], > > where f[X[t]] is a specified function, and X[t] is a vector of solution functions {x1[t],x2[t],...}. The initial conditions are specified by a vector X[0] = {x1[0],x2[0],...}. > > In my problem, the number of solution functions will usually vary from 3 to 7, but could be any number. > > One approach that doesn't work is: > > f := {f[[1]][t], f[[2]][t], f[[3]][t]} > fInit := {0, 0, 2} > mat := {(-3*f[[1]][t] - f[[2]][t]), 26.5*f[[1]][t] - f[[2]][t] - f[[1]][t]*f[[3]][t], f[[1]][t]*f[[2]][t] - f[[3]][t]} > solution = NDSolve[{Derivative[1][f][t] == mat, f[0] == fInit}, f, {t, 0, 17}] > > I don't know if the problem is in the way f is specified or in my expression for NDSolve. > > I'd appreciate any assistance. > > Thanks and regards, > > Glenn > From mathgroup-adm at smc.vnet.net Mon Jul 25 05:32:57 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E2C586BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:32:57 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAWxjE026096; Mon, 25 Jul 2011 05:32:59 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id E3F42A81B0; Mon, 25 Jul 2011 05:32:58 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 2E701A8195; Mon, 25 Jul 2011 05:32:57 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25449 for mathgroup-newout; Mon, 25 Jul 2011 07:27:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25444 for mathgroup-newsend; Mon, 25 Jul 2011 07:27:29 -0400 (EDT) Date: Mon, 25 Jul 2011 07:27:29 -0400 (EDT) Message-Id: <201107251127.HAA25444 at smc.vnet.net> From: Glenn Carlson <g.crlsn at gmail.com> Subject: [mg120473] Re: NDSolve in matrix form To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.102121 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1500_1599 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Thanks for your response, Kevin. I figured out how to do this late last night. I attribute differences between the solution in terms of f[1][t], f[2][t], and f[3][t] and the solution from the tutorial in terms of x[t], y[t], and z[t] to be due to internal numerics in solving the nonlinear system. Applying either approach to the differential-algebraic system in the tutorial gives the same result. Thanks again very much. Glenn ------------ (* System of ordinary differential equations. http://reference.wolfram.com/mathematica/tutorial/NumericalSolutionOfDifferentialEquations.html *) n := 3 fInit := {0, 2, 0} mat[t_] = {-3 (f[1][t] - f[2][t]), -f[1][t] f[3][t] + 26.5 f[1][t] - f[2][t], f[1][t] f[2][t] - f[3][t]}; (* Create a list of the solution functions excl. the argument t. *) fsol = Table[f[i], {i, 1, n}]; (* Create a list of ODEs and ICs for NDSolve. *) sys = Join[Table[fsol[[i]]'[t] == mat[t][[i]], {i, 1, n}], Table[fsol[[i]][0] == fInit[[i]], {i, 1, n}]]; solution1 = NDSolve[sys, fsol, {t, 0, 200}, MaxSteps -> Infinity] (* Create a list of solution functions incl. the argument t for ParametricPlot3D. *) fsolt = Table[f[i][t], {i, 1, n}] ParametricPlot3D[Evaluate[fsolt /. solution1], {t, 0, 200}, PlotPoints -> 10000, ColorFunction ->(ColorData["Rainbow"][#4] &)] (* Plot solutions as functions of time. *) Plot[Evaluate[f[1][t] /. solution1], {t, 0, 200}] Plot[Evaluate[f[2][t] /. solution1], {t, 0, 200}] Plot[Evaluate[f[3][t] /. solution1], {t, 0, 200}] Plot[Evaluate[fsolt /. solution1], {t, 0, 200}] From mathgroup-adm at smc.vnet.net Mon Jul 25 05:33:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id DAC6C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:33:40 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAXgaI026136; Mon, 25 Jul 2011 05:33:42 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 271BEBF417; Mon, 25 Jul 2011 05:33:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C49B7A813D; Mon, 25 Jul 2011 05:33:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25464 for mathgroup-newout; Mon, 25 Jul 2011 07:27:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25459 for mathgroup-newsend; Mon, 25 Jul 2011 07:27:51 -0400 (EDT) Date: Mon, 25 Jul 2011 07:27:51 -0400 (EDT) Message-Id: <201107251127.HAA25459 at smc.vnet.net> From: icegood <icegood1980 at gmail.com> Subject: [mg120475] default font To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.102121 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_10_99 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. everytime with new norebook i change font size. How to change it in default manner? From mathgroup-adm at smc.vnet.net Mon Jul 25 05:35:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4F6416BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:35:19 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAZKLY026302; Mon, 25 Jul 2011 05:35:20 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9BE62BF471; Mon, 25 Jul 2011 05:35:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 237B4BF42E; Mon, 25 Jul 2011 05:35:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25492 for mathgroup-newout; Mon, 25 Jul 2011 07:28:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25487 for mathgroup-newsend; Mon, 25 Jul 2011 07:28:34 -0400 (EDT) Date: Mon, 25 Jul 2011 07:28:34 -0400 (EDT) Message-Id: <201107251128.HAA25487 at smc.vnet.net> From: rych <rychphd at gmail.com> Subject: [mg120479] Simplify[ArcTan[Tan[a] + Tan[b]]] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.102121 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_200_299 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Can't Mathematica tell anything about ArcTan[Tan[a] + Tan[b]]? Maybe there exists no useful identity for that? By useful I mean the expression with functions of the "angles" a and b other than tangents. Thanks Igor From mathgroup-adm at smc.vnet.net Mon Jul 25 05:37:08 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A4A2A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:37:08 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAb9X4026406; Mon, 25 Jul 2011 05:37:09 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 6F3DBBF471; Mon, 25 Jul 2011 05:37:09 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D5E01BF42E; Mon, 25 Jul 2011 05:37:07 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25520 for mathgroup-newout; Mon, 25 Jul 2011 07:29:07 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25514 for mathgroup-newsend; Mon, 25 Jul 2011 07:29:07 -0400 (EDT) Date: Mon, 25 Jul 2011 07:29:07 -0400 (EDT) Message-Id: <201107251129.HAA25514 at smc.vnet.net> From: Richard Fateman <fateman at cs.berkeley.edu> Subject: [mg120482] And now for something completely different To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.102714 Can you start a paragraph with "And"? http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 says, 'No.' Stephen Wolfram often does so, and I find it annoying. example http://www.wolframscience.com/nksonline/page-42?firstview=1 This construction seems to have been removed from the online documentation. --RJF From mathgroup-adm at smc.vnet.net Mon Jul 25 05:39:13 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 5FA676BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:39:13 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAdEiO026585; Mon, 25 Jul 2011 05:39:14 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id A6D09BF42E; Mon, 25 Jul 2011 05:39:14 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 4E0E0BF417; Mon, 25 Jul 2011 05:39:13 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25537 for mathgroup-newout; Mon, 25 Jul 2011 07:29:29 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25532 for mathgroup-newsend; Mon, 25 Jul 2011 07:29:28 -0400 (EDT) Date: Mon, 25 Jul 2011 07:29:28 -0400 (EDT) Message-Id: <201107251129.HAA25532 at smc.vnet.net> From: paulvonhippel at yahoo <paulvonhippel at yahoo.com> Subject: [mg120484] Re: TransformedDistribution -- odd problem References: <j0gh7s$bd7$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.102714 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_500_599 0, BODY_SIZE_7000_LESS 0, FROM_NAME_PHRASE 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I also have a more complicated example where Mathematica will give the mean of A and the mean of B, but when I ask for the mean of A+B Mathematica just echoes the input. (Here A and B are complicated functions of several random variables.) This strikes me as really odd, since of course Mean(A+B)=Mean(A)+Mean(B). What could be going on here? Under what circumstances does Mathematica echo the input when asked to provide a Mean? Is there a setting I need to change? I suspect this is a software issue rather than a mathematical issue. From mathgroup-adm at smc.vnet.net Mon Jul 25 05:41:11 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AAE306BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:41:11 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAfDc6026873; Mon, 25 Jul 2011 05:41:13 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id BF531A8158; Mon, 25 Jul 2011 05:41:12 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 65EE9A813D; Mon, 25 Jul 2011 05:41:11 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25478 for mathgroup-newout; Mon, 25 Jul 2011 07:28:13 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25473 for mathgroup-newsend; Mon, 25 Jul 2011 07:28:12 -0400 (EDT) Date: Mon, 25 Jul 2011 07:28:12 -0400 (EDT) Message-Id: <201107251128.HAA25473 at smc.vnet.net> From: Don <donabc at comcast.net> Subject: [mg120477] Grid Divider Style With Background Colors To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.102714 Mathematica permits divider lines between rows and columns in a table (grid) such as this example from the documentation: Grid[Table[x, {4}, {11}], Dividers -> {{{{True, False}}, -1 -> True}, False}] But, the dividers are single lines only. Sometimes double line dividers are desired as shown in this table on the Web: http://www.assetcorrelation.com/user/correlations/90 Notice that the background color for an item is only within the inside line of a double line divider. Is there any way to produce (a) this kind of divider (double line) and (b) with background colors for specific items that don't cross the inside line of the double line divider? Thank you in advance. Don From mathgroup-adm at smc.vnet.net Mon Jul 25 05:43:25 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EB7E16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:43:25 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAhR3j027023; Mon, 25 Jul 2011 05:43:27 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 2E6ADA8158; Mon, 25 Jul 2011 05:43:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 87D8AA813D; Mon, 25 Jul 2011 05:43:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25470 for mathgroup-newout; Mon, 25 Jul 2011 07:28:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25465 for mathgroup-newsend; Mon, 25 Jul 2011 07:28:02 -0400 (EDT) Date: Mon, 25 Jul 2011 07:28:02 -0400 (EDT) Message-Id: <201107251128.HAA25465 at smc.vnet.net> From: Markus <markus.seywerd at googlemail.com> Subject: [mg120476] Re: CDF Files Break when being mailed or uploaded References: <j0fop8$8or$1 at smc.vnet.net> <j0h0a2$dgm$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.103015 On Jul 24, 12:39 pm, Jay Bee <jiri.bo... at gmail.com> wrote: > On Jul 24, 1:25 am, Markus <markus.seyw... at seywerd.com> wrote: > > > Hi I have created a Computable Document File with a Barchart. When I > > transfer the file to a machine using a flash drive or over the office > > network the receiver can read the file with the CDF reader and > > everything looks good. However if I email or ftp the file to another > > location the barchart is broken. Does anyone have any ideas? > > Hi, Markus. Have you tried to send it archived? > -jb- Yes I have tried to send it as a zip file and the same thing happens. From mathgroup-adm at smc.vnet.net Mon Jul 25 05:45:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4D2E56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:45:35 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAjall027314; Mon, 25 Jul 2011 05:45:36 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 7E619FF004; Mon, 25 Jul 2011 05:45:36 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B3D3DFF003; Mon, 25 Jul 2011 05:45:34 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25563 for mathgroup-newout; Mon, 25 Jul 2011 07:30:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25558 for mathgroup-newsend; Mon, 25 Jul 2011 07:30:01 -0400 (EDT) Date: Mon, 25 Jul 2011 07:30:01 -0400 (EDT) Message-Id: <201107251130.HAA25558 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120487] Re: how to ListPlot3D large data sets References: <201107232354.TAA08712 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.103015 On Sat, 23 Jul 2011, Ted Sariyski wrote: > Hi, > I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a data > set with many millions of records. I was not able to get an image from the > full dataset, it takes forever. If I use e.g. every fifth record, although > slow, I get an image. The machine running Mathematica is Windows 7 (64 bit), > has 24 GB RAM and there was no swapping. I wonder what is considered as a > reasonable data size for ListPlot3D and are there other tools in Mathematica > for visualization of large data sets? > Thanks in advance, > --Ted > > > Ted, is your data packed? Developer`PackedArrayQ[yourData] Oliver From mathgroup-adm at smc.vnet.net Mon Jul 25 05:47:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 150DC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:47:26 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAlMB2027438; Mon, 25 Jul 2011 05:47:27 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 3ED69FF006; Mon, 25 Jul 2011 05:47:22 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 5E0E6FF004; Mon, 25 Jul 2011 05:47:20 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25511 for mathgroup-newout; Mon, 25 Jul 2011 07:28:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25506 for mathgroup-newsend; Mon, 25 Jul 2011 07:28:56 -0400 (EDT) Date: Mon, 25 Jul 2011 07:28:56 -0400 (EDT) Message-Id: <201107251128.HAA25506 at smc.vnet.net> From: Alan <alan.isaac at gmail.com> Subject: [mg120481] Re: CDF Files Break when being mailed or uploaded References: <j0fop8$8or$1 at smc.vnet.net> <j0h0a2$dgm$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.103914 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_700_799 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Are you running on the same version of Mathematica at both ends? If it is Mathematica on one end and the Mathematica Player on the other, it could be a player bug. If the former, either the file is changed or it is different than expected at the other platform, probably the latter. You can tell if the file changes by using a check sum tool at both ends. The most likely cross-platform problem would involve handling of end- of-line conventions. http://www.rfc-editor.org/EOLstory.txt This is pure speculation: I don't know how Mathematica handles end-of-lines across platforms. Hopefully it transparently handles any common end-of-lines (like many popular editors). fwiw, Alan Isaac From mathgroup-adm at smc.vnet.net Mon Jul 25 05:49:29 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8EAA36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:49:29 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAnUUt027619; Mon, 25 Jul 2011 05:49:30 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 8BAC0A81B0; Mon, 25 Jul 2011 05:49:30 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 27904A8195; Mon, 25 Jul 2011 05:49:29 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25552 for mathgroup-newout; Mon, 25 Jul 2011 07:29:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25547 for mathgroup-newsend; Mon, 25 Jul 2011 07:29:50 -0400 (EDT) Date: Mon, 25 Jul 2011 07:29:50 -0400 (EDT) Message-Id: <201107251129.HAA25547 at smc.vnet.net> From: Joseph Gwinn <joegwinn at comcast.net> Subject: [mg120486] Re: how to ListPlot3D large data sets References: <201107222344.TAA28525 at smc.vnet.net> <201107230628.CAA01688 at smc.vnet.net> <j0fou1$8pm$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.103914 In article <j0fou1$8pm$1 at smc.vnet.net>, "Ted Sariyski" <tsariysk at craft-tech.com> wrote: > Hi, > I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a data > set with many millions of records. I was not able to get an image from the > full dataset, it takes forever. If I use e.g. every fifth record, although > slow, I get an image. The machine running Mathematica is Windows 7 (64 bit), > has 24 GB RAM and there was no swapping. I wonder what is considered as a > reasonable data size for ListPlot3D and are there other tools in Mathematica > for visualization of large data sets? How long did you wait for the full dataset picture to form? I have plotted some very large datasets over the years, and although slow, it usually worked. So long as there was enough memory. But printing the image is quite another matter. Joe Gwinn From mathgroup-adm at smc.vnet.net Mon Jul 25 05:51:23 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C641F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:51:23 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PApPfK027739; Mon, 25 Jul 2011 05:51:25 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 1010CFF007; Mon, 25 Jul 2011 05:51:25 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 4670AFF006; Mon, 25 Jul 2011 05:51:23 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25442 for mathgroup-newout; Mon, 25 Jul 2011 07:27:19 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25437 for mathgroup-newsend; Mon, 25 Jul 2011 07:27:19 -0400 (EDT) Date: Mon, 25 Jul 2011 07:27:19 -0400 (EDT) Message-Id: <201107251127.HAA25437 at smc.vnet.net> From: Helen Read <readhpr at gmail.com> Subject: [mg120472] Re: CDF Files Break when being mailed or uploaded References: <j0fop8$8or$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.104514 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On 7/23/2011 8:25 PM, Markus wrote: > Hi I have created a Computable Document File with a Barchart. When I > transfer the file to a machine using a flash drive or over the office > network the receiver can read the file with the CDF reader and > everything looks good. However if I email or ftp the file to another > location the barchart is broken. Does anyone have any ideas? Your FTP client and email client (or web server, if you are using webmail) may be sending the CDF files as ASCII, which is often the default if the file type is not recognized, and may be throwing in extra line breaks that wreck the file. Try setting your FTP client to send CDF files (or all files, for that matter) as Binary. As for email, if it is webmail, ask your Sys Admin to set a Mime type for CDF so that it is recognized as an application. If you are using some an e-mail client (Outlook or whatever), you may have to look around in the settings to see how it handles attachments. -- Helen Read University of Vermont From mathgroup-adm at smc.vnet.net Mon Jul 25 05:53:12 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 08EDC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:53:12 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAr8CQ027799; Mon, 25 Jul 2011 05:53:13 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 5D262FF006; Mon, 25 Jul 2011 05:53:08 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 93D6FFF004; Mon, 25 Jul 2011 05:53:06 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25505 for mathgroup-newout; Mon, 25 Jul 2011 07:28:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25499 for mathgroup-newsend; Mon, 25 Jul 2011 07:28:45 -0400 (EDT) Date: Mon, 25 Jul 2011 07:28:45 -0400 (EDT) Message-Id: <201107251128.HAA25499 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120480] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text Cells Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.104514 On Fri, 22 Jul 2011 19:46:07 -0400 (EDT), Gregory Lypny wrote: > Hi everyone, > > When I include fractions as inline math typesetting, they are scaled down > to fit the effective line height of the cell. How can I prevent this or, > I guess, make the line height automatically expand to accommodate the > math? If my regular text in the cell is 12-point times, I'd like all > math variables that are not subscripts or superscripts to be 12-point as > well. > > Incidentally, other big typeset objects like matrices are not scaled > down, or at least they down't appear to be. > > Sincerely, > > Gregory If you look in Core.nb, you'll find a style called "InlineCell". This style is automatically applied to all inline cells everywhere. One of the options it has set is: ScriptLevel->1 This is what's causing the behavior you're seeing. You can override this with a custom stylesheet. For example, in a given notebook, you can make a private override by doing Format->Edit Stylesheet..., and pasting and interpreting the following cell expression at the end of the resulting stylesheet notebook: Cell[StyleData["InlineCell"], ScriptLevel->0] Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Mon Jul 25 05:55:20 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 078C86BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:55:20 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAtLK4028427; Mon, 25 Jul 2011 05:55:21 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 09F33BF47E; Mon, 25 Jul 2011 05:55:21 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 08BA1BF471; Mon, 25 Jul 2011 05:55:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25458 for mathgroup-newout; Mon, 25 Jul 2011 07:27:41 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25453 for mathgroup-newsend; Mon, 25 Jul 2011 07:27:40 -0400 (EDT) Date: Mon, 25 Jul 2011 07:27:40 -0400 (EDT) Message-Id: <201107251127.HAA25453 at smc.vnet.net> From: Andrzej Kozlowski <akoz at mimuw.edu.pl> Subject: [mg120474] Re: From Reduce to List References: <201107232354.TAA08719 at smc.vnet.net> <201107241138.HAA13798 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.104514 I think the only exceptions are non-generic cases like this one: {Reduce[a x == 0, x] // ToRules} {{a->0},{x->0}} Solve[a x == 0, x] {{x->0}} Andrzej Kozlowski On 24 Jul 2011, at 12:38, Fred Simons wrote: > In[8]:= > expr=(a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004&&b==251000); > {a,b}/.{ToRules[expr]} > > Out[9]= {{1001,1001000},{1002,501000},{1004,251000}} > > If expr is indeed the result of a Reduce command, I think it is very > likely that instead of Reduce you could have used Solve (it has quite a > lot of new features) in order to obtain the rules immediately. > > Kind regards, > > Fred Simons > Eindhoven University of Technology > > Op 24-7-2011 1:54, Harvey P. Dale schreef: >> What is the easiest and most efficient way to transform the >> output from Reduce into a list of values? For example, if Reduce >> produces >> (a==1001&&b==1001000)||(a==1002&&b==501000)||(a==1004= >> &&b==251000) and I >> want {{1001,1001000},{1002,501000},{1004,251000}}, what is the best way >> to go from the former to the latter? >> >> Harvey >> >> Harvey P. Dale >> University Professor of Philanthropy and the Law >> Director, National Center on Philanthropy and the Law >> 139 MacDougal Street >> New York, N.Y. 10012-1076 >> Tel: 212-998-6161 >> Fax: 212-995-3149 > > From mathgroup-adm at smc.vnet.net Mon Jul 25 05:57:13 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 863036BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:57:13 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAvE3U028551; Mon, 25 Jul 2011 05:57:14 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 4E5EAA8158; Mon, 25 Jul 2011 05:57:14 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 93567BF42E; Mon, 25 Jul 2011 05:57:12 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25436 for mathgroup-newout; Mon, 25 Jul 2011 07:27:08 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25431 for mathgroup-newsend; Mon, 25 Jul 2011 07:27:08 -0400 (EDT) Date: Mon, 25 Jul 2011 07:27:08 -0400 (EDT) Message-Id: <201107251127.HAA25431 at smc.vnet.net> From: Yves Klett <yves.klett at googlemail.com> Subject: [mg120471] Re: Producing an image that only contains its interior and boundary but, no exterior. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.104814 Murray, not sure anymore if someone from WRI helped me out (John Fultz comes to mind) at some point or if I found it somewhere else. And yes, I do not think it is documented properly for whatever reason. Googling for "mathematica shrinkwrap" turns up several hits around 2008. Regards, Yves Am 24.07.2011 02:26, schrieb Murray Eisenberg: > How did you discover that option for Show? > > I find no entry for "ShrinkWrap" in the Documentation Center, see no > mention of that option value on the page for Show. On the Graphics3D ref > page, the option Method is listed in the More Information section, but > that Method option is not listed in the Options section of Examples. > > And of course the ref page for Method is essentially useless in such a > case. It's long been a documentation lacuna that there are no "inverse > references" for such options as Method that apply to multiple functions > -- from the general option such as Method back to all the functions for > which it's an option, along with some information as to what settings > are allowed for each such function (at least in cases where within the > target function page itself the settings are not all listed). > > > On 7/22/11 7:47 PM, Yves Klett wrote: >> g = Graphics3D[Cuboid[], SphericalRegion -> True] >> >> Show[g, Method -> {"ShrinkWrap" -> True}] > From mathgroup-adm at smc.vnet.net Mon Jul 25 05:59:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A3FB46BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 05:59:48 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PAxn22028704; Mon, 25 Jul 2011 05:59:50 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id E5B64A8170; Mon, 25 Jul 2011 05:59:49 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id F04C4A8158; Mon, 25 Jul 2011 05:59:27 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25546 for mathgroup-newout; Mon, 25 Jul 2011 07:29:40 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25540 for mathgroup-newsend; Mon, 25 Jul 2011 07:29:39 -0400 (EDT) Date: Mon, 25 Jul 2011 07:29:39 -0400 (EDT) Message-Id: <201107251129.HAA25540 at smc.vnet.net> From: paulvonhippel at yahoo <paulvonhippel at yahoo.com> Subject: [mg120485] Re: TransformedDistribution -- odd problem References: <j0gh7s$bd7$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.104814 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1500_1599 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. A little more experimenting shows that the TransformedDistribution function will also not provide the mean of k+F where k is a constant and F has an F distribution -- i.e., Mean[TransformedDistribution[k*F , F \[Distributed] FRatioDistribution[v, v]]] If I changce the distribution of F to NormalDistribution or ChiSquareDistribution, I can get a mean for k*F or k+F. So the problem only occurs when I define a simple function of an F variable using the TransformedDistribution function. This all strikes me as very strange, and I'd be curious to know if others can reproduce my results. If you can't reproduce my results, I'd be interested in theories about why my results differ from yours. E.g., is there a setting I should change in the software? I am using version 8.0.0.0 and looking to upgrade to 8.0.1, if that makes a difference. Many thanks for any pointers. On Jul 24, 2:22 am, paulvonhippel at yahoo <paulvonhip... at yahoo.com> wrote: > I'm having a very strange problem with TransformedDistribution, where > I can calculate the mean of an F distribution but I cannot calculate > the mean of a constant multiplied by an F distribution. That is, if I > type > > Mean[TransformedDistribution[F, F \[Distributed] > FRatioDistribution[v, v]]] > > Mathematica gives me an answer. But if I type > > Mean[TransformedDistribution[k*F , F \[Distributed] > FRatioDistribution[v, v]]] > > Mathematica just echoes the input. I swear I got an answer for the > second expression earlier today. What am I doing wrong? From mathgroup-adm at smc.vnet.net Mon Jul 25 06:01:17 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 562636BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 06:01:17 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PB16NI029093; Mon, 25 Jul 2011 06:01:09 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id A32B9A8170; Mon, 25 Jul 2011 06:01:05 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 173E3A813D; Mon, 25 Jul 2011 06:01:04 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25571 for mathgroup-newout; Mon, 25 Jul 2011 07:30:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25566 for mathgroup-newsend; Mon, 25 Jul 2011 07:30:12 -0400 (EDT) Date: Mon, 25 Jul 2011 07:30:12 -0400 (EDT) Message-Id: <201107251130.HAA25566 at smc.vnet.net> From: Gabriel Landi <gtlandi at gmail.com> Subject: [mg120488] Re: NDSolve in matrix form References: <201107240719.DAA11656 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.104814 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1600_1699 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hi Glenn. I solve a similar system in the following way: Say it is defined as X'(t) = a X(t) + b Then once i know a,b and my initial conditions ic, i do: vars = Table[f[i][t],{i,n}]; varsD = D[#,t ] &/@vars; eqns = Flatten@{Thread[varsD == a.vars + b], Thread[(vars /. t -> 0) == ic]}; sol = NDSolve[eqns,vars,{t,0,tf}] Good luck, Gabriel On Jul 24, 2011, at 4:19 AM, Glenn Carlson wrote: > I am trying to numerically solve systems of ODEs using Mathematica 7. > > The desired accuracy that I am striving for depends on the number of solution functions so I want to structure my solution algorithm to allow different numbers of solution functions. Solving the problem as a system of ODEs in matrix form seems the logical choice: > > dX/dt = f[X[t]], > > where f[X[t]] is a specified function, and X[t] is a vector of solution functions {x1[t],x2[t],...}. The initial conditions are specified by a vector X[0] = {x1[0],x2[0],...}. > > In my problem, the number of solution functions will usually vary from 3 to 7, but could be any number. > > One approach that doesn't work is: > > f := {f[[1]][t], f[[2]][t], f[[3]][t]} > fInit := {0, 0, 2} > mat := {(-3*f[[1]][t] - f[[2]][t]), 26.5*f[[1]][t] - f[[2]][t] - f[[1]][t]*f[[3]][t], f[[1]][t]*f[[2]][t] - f[[3]][t]} > solution = NDSolve[{Derivative[1][f][t] == mat, f[0] == fInit}, f, {t, 0, 17}] > > I don't know if the problem is in the way f is specified or in my expression for NDSolve. > > I'd appreciate any assistance. > > Thanks and regards, > > Glenn > From mathgroup-adm at smc.vnet.net Mon Jul 25 06:02:58 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id DBA316BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 06:02:58 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PB30sx029608; Mon, 25 Jul 2011 06:03:00 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id B8164BF417; Mon, 25 Jul 2011 06:02:59 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 4EF58A813D; Mon, 25 Jul 2011 06:02:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25528 for mathgroup-newout; Mon, 25 Jul 2011 07:29:18 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25523 for mathgroup-newsend; Mon, 25 Jul 2011 07:29:17 -0400 (EDT) Date: Mon, 25 Jul 2011 07:29:17 -0400 (EDT) Message-Id: <201107251129.HAA25523 at smc.vnet.net> From: Robert Rosenbaum <robertr at math.uh.edu> Subject: [mg120483] Re: TransformedDistribution, for a sum of M iid variables References: <201107232353.TAA08706 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.105414 >> Thanks for the neat proof. Sorry I wasn't clear about my goals. I >> want to include a sum of iid variables in a TransfornedDistribution, >> and then calculate the Mean and Variance of the distribution. I know I'm pointing out the obvious here, but the mean and variance of a sum of independent variables is the sum of the means and variances. No need to use TransformedDistribution or CumulantGeneratingFunction or anything else. Perhaps you're trying to provide an illustration to a classroom or something along those lines and you want to plot the density of the sum, then find its mean and variance. You can achieve this by convolving the individual densities. On Jul 23, 2011, at 6:53 PM, Bill Rowe wrote: > On 7/22/11 at 3:42 AM, paulvonhippel at yahoo.com (Paul von Hippel) > wrote: > >> Thanks for the neat proof. Sorry I wasn't clear about my goals. I >> want to include a sum of iid variables in a TransfornedDistribution, >> and then calculate the Mean and Variance of the distribution. > >> The iid variables need not be normal, and the TrasformedDistribution >> will contain other variables besides the iid sum. > > While it is possible to do this using TransformedDistribution, I > think it is far easier to to what you want with the various > generating functions built into Mathematica. Use the exponential > distribution as an example. For the exponential distribution: > > In[2]:= mg = > CumulantGeneratingFunction[ExponentialDistribution[a], t] > > Out[2]= Log[a/(a - t)] > > Cumulants sum. So, the cumulant generating function for the sum > n exponential deviates is simply n times the cumulant generating > function of the original exponential distribution. And the mean > is the first derivative of the cumulant generating function > evaluated at t = 0. So, the mean of the sum of n exponential > deviates is: > > In[3]:= D[n mg, t] /. t -> 0 > > Out[3]= n/a > > And the variance is given by the second derivative. So, the > desired variance is: > > In[4]:= D[n mg, {t, 2}] /. t -> 0 > > Out[4]= n/a^2 > > And to check the validity of the above, note: > > In[5]:= MomentGeneratingFunction[ExponentialDistribution[a], t] > > Out[5]= a/(a - t) > > In[8]:= MomentGeneratingFunction[GammaDistribution[n, 1/a], t] > > Out[8]= (1 - t/a)^(-n) > > That is, the sum of n exponential deviates is distributed as a > gamma distribution with parameters n, 1/a. So, > > In[9]:= Mean[GammaDistribution[n, 1/a]] > > Out[9]= n/a > > In[10]:= Variance[GammaDistribution[n, 1/a]] > > Out[10]= n/a^2 > > which verifies the earlier result using the cumulant generating > function. Note, this technique of using generating functions > does not require the sum to be of identically distributed > values. I could just as easily find the mean and variance of say > the sum of an exponential deviate and the sum of a normal > deviate using this technique. > > Best, Robert From mathgroup-adm at smc.vnet.net Mon Jul 25 06:03:27 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B36416BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Mon, 25 Jul 2011 06:03:27 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6PB3TIg029671; Mon, 25 Jul 2011 06:03:29 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id D5BCCBF42E; Mon, 25 Jul 2011 06:03:28 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 6B15FA813D; Mon, 25 Jul 2011 06:03:27 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25485 for mathgroup-newout; Mon, 25 Jul 2011 07:28:24 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA25480 for mathgroup-newsend; Mon, 25 Jul 2011 07:28:23 -0400 (EDT) Date: Mon, 25 Jul 2011 07:28:23 -0400 (EDT) Message-Id: <201107251128.HAA25480 at smc.vnet.net> From: Paul von Hippel <paulvonhippel at yahoo.com> Subject: [mg120478] Re: TransformedDistribution, for a sum of M iid variables Reply-To: Paul von Hippel <paulvonhippel at yahoo.com> References: <20110721225621.9H9BM.1153349.imail@eastrmwml34> <j0b9p4$jl1$1 at smc.vnet.net> <201107222346.TAA28623 at smc.vnet.net> <4E2D4909.813B.006A.0 at newcastle.edu.au> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.25.105414 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FRAUD_WEBMAIL_REPLYTO 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I meant question ii -- i.e., how do I code this in Mathematica. The problem I am trying to solve is complicated and it wouldn't be productive to lay out all its details. But a simpler version would be this: I wish to calculate the mean and variance of the distribution U+avgMF, where U is a chi-square variable and avgMF is the average of M iid F variables. I can solve this problem by hand, but I wish solve this and similar, more complicated problems using the TransformedDistribution function. Many thanks for any pointers. ________________________________ From: Barrie Stokes <Barrie.Stokes at newcastle.edu.au> To: mathgroup at smc.vnet.net; paulvonhippel at yahoo <paulvonhippel at yahoo.com> Sent: Sunday, July 24, 2011 7:44 PM Subject: [mg120478] Re: TransformedDistribution, for a sum of M iid variables Hi Paul I for one am not clear on the exact question you are asking. If by "Is there a convenient way to do this?" and you mean by "this" "... replace Z2 with the average of M independent variables", do you mean: (i) how do I calculate the distribution of the average of M independent variables (a technical statistical question, the answer to which can be found an any statistics textbook), or (ii) how do I code the whole calculation in Mathematica (a Mathematica coding/representation question). Maybe, as with many questions posted on this group, more background details will help respondents to your question(s) give you better answers. For example, do you have a particular problem in mind (i.e., application), or are you just generally curious (always a great idea) about how to do such and similar things? (I often think there's a monotonically increasing relation between usefulness of answer and quality of question, if I may put it like that). Willing to help with either question ... Cheers Barrie >>> On 23/07/2011 at 9:46 am, in message <201107222346.TAA28623 at smc.vnet.net>, paulvonhippel at yahoo <paulvonhippel at yahoo.com> wrote: > To clarify what I'm looking for, suppose I have the following > distribution: > > TransformedDistribution[Z1+Sqrt[U/(n-1)]*Z2,{Z1\ > [Distributed]NormalDistribution[0,1],Z2\ > [Distributed]NormalDistribution[0,1],U\ > [Distributed]ChiSquareDistribution[n-1]}] > > I want to replace Z2 with the average of M independent variables that > are distributed like Z2. > Or I might want to replace U with the average of M independent > variables that are distributed like U. > > Is there a convenient way to do this? Thanks! From mathgroup-adm at smc.vnet.net Tue Jul 26 05:14:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7EC9A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:14:50 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAEpJm017934; Tue, 26 Jul 2011 05:14:51 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 86C4EBF47C; Tue, 26 Jul 2011 05:14:51 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id CC6F1BF471; Tue, 26 Jul 2011 05:14:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09208 for mathgroup-newout; Tue, 26 Jul 2011 07:05:58 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09203 for mathgroup-newsend; Tue, 26 Jul 2011 07:05:57 -0400 (EDT) Date: Tue, 26 Jul 2011 07:05:57 -0400 (EDT) Message-Id: <201107261105.HAA09203 at smc.vnet.net> From: "Joseph O'Rourke" <orourke at scinix.smith.edu> Subject: [mg120493] Re: ExampleData[{"Geometry3D", "Torus"}] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.100314 Thanks, Heike, for the suggestion to use RevolutionPlot3D[]. I didn't even know about that function! So your suggestion is very useful. From mathgroup-adm at smc.vnet.net Tue Jul 26 05:14:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C59E16BB19 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:14:50 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAEpjX017937; Tue, 26 Jul 2011 05:14:51 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id CDDB9A813D; Tue, 26 Jul 2011 05:14:51 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id CF943A818D; Tue, 26 Jul 2011 05:14:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09272 for mathgroup-newout; Tue, 26 Jul 2011 07:07:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09267 for mathgroup-newsend; Tue, 26 Jul 2011 07:07:13 -0400 (EDT) Date: Tue, 26 Jul 2011 07:07:13 -0400 (EDT) Message-Id: <201107261107.HAA09267 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120500] Re: default font References: <201107251127.HAA25459 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.100314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_200_299 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. The default FontSize of a notebook is set by the global option FontSize. You can change it by running something like SetOptions[$FrontEnd, FontSize -> 14] Heike. > everytime with new norebook i change font size. How to change it in > default manner? > From mathgroup-adm at smc.vnet.net Tue Jul 26 05:15:02 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 0295F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:15:02 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAF2uD018025; Tue, 26 Jul 2011 05:15:03 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 51730A813D; Tue, 26 Jul 2011 05:15:03 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E6F45A8176; Tue, 26 Jul 2011 05:15:01 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09223 for mathgroup-newout; Tue, 26 Jul 2011 07:06:19 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09218 for mathgroup-newsend; Tue, 26 Jul 2011 07:06:19 -0400 (EDT) Date: Tue, 26 Jul 2011 07:06:19 -0400 (EDT) Message-Id: <201107261106.HAA09218 at smc.vnet.net> From: Gary Wardall <gwardall at gmail.com> Subject: [mg120495] Re: Simplify[ArcTan[Tan[a] + Tan[b]]] References: <j0jk6s$ovj$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.100314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_600_699 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 25, 6:31 am, rych <rych... at gmail.com> wrote: > Can't Mathematica tell anything about ArcTan[Tan[a] + Tan[b]]? Maybe > there exists no useful identity for that? By useful I mean the > expression with functions of the "angles" a and b other than tangents. > Thanks > Igor Igor, I'm not quite sure what you want Mathematica to do with it. It's not like ArcTan and Tan are truly inverses. ArcTan[Tan[W]] my not be W while Tan[ArcTan[W]] is W. Personally I think ArcTan[Tan[a] + Tan[b]] is simplified enough. Of course there are many alternate and equal expressions to it that could be of some use. But, which one? Gary From mathgroup-adm at smc.vnet.net Tue Jul 26 05:17:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 444846BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:17:19 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAHKNH018293; Tue, 26 Jul 2011 05:17:20 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 7878DA8110; Tue, 26 Jul 2011 05:17:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B1637BF47C; Tue, 26 Jul 2011 05:17:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09230 for mathgroup-newout; Tue, 26 Jul 2011 07:06:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09224 for mathgroup-newsend; Tue, 26 Jul 2011 07:06:29 -0400 (EDT) Date: Tue, 26 Jul 2011 07:06:29 -0400 (EDT) Message-Id: <201107261106.HAA09224 at smc.vnet.net> From: JonSilverman <jonsilverman2006 at gmail.com> Subject: [mg120496] Can't make Input[] work the way I want it to. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.100614 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_300_399 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. When prompted for an input by Input[], I want to input a list of numbers. But when i try to enter more than one number I get something like this: RowBox[{"45", ",", "65", ",", "56"}] What is that? If I added spaces then the space got automatically turned into a multiplication sign! How can I enter a list at the input prompt? From mathgroup-adm at smc.vnet.net Tue Jul 26 05:18:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C3F5D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:18:48 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAIo5M018361; Tue, 26 Jul 2011 05:18:50 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 23001BF471; Tue, 26 Jul 2011 05:18:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 8EA45A8110; Tue, 26 Jul 2011 05:18:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09321 for mathgroup-newout; Tue, 26 Jul 2011 07:08:19 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09316 for mathgroup-newsend; Tue, 26 Jul 2011 07:08:19 -0400 (EDT) Date: Tue, 26 Jul 2011 07:08:19 -0400 (EDT) Message-Id: <201107261108.HAA09316 at smc.vnet.net> From: Brett Champion <brettc at wolfram.com> Subject: [mg120506] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.100614 On Jul 25, 2011, at 6:29 AM, Richard Fateman wrote: > > Can you start a paragraph with "And"? > > http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > > says, 'No.' > > > Stephen Wolfram often does so, and I find it annoying. > example > http://www.wolframscience.com/nksonline/page-42?firstview=1 > http://www.wolframscience.com/nksonline/page-849c-text?firstview=1 Other links, which show up above Yahoo! Answers in a Google search: http://wiki.answers.com/Q/Can_you_start_a_sentence_with_the_word_And = http://www.dailywritingtips.com/can-you-start-sentences-with-=93and=94-and= -=93but=94/ http://www.gpuss.co.uk/english_usage/start_sentence_conjunction.htm Brett= From mathgroup-adm at smc.vnet.net Tue Jul 26 05:21:39 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 0AE9C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:21:39 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QALenv018750; Tue, 26 Jul 2011 05:21:40 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 57CD6BF47C; Tue, 26 Jul 2011 05:21:40 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C2243A813D; Tue, 26 Jul 2011 05:21:38 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09215 for mathgroup-newout; Tue, 26 Jul 2011 07:06:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09210 for mathgroup-newsend; Tue, 26 Jul 2011 07:06:08 -0400 (EDT) Date: Tue, 26 Jul 2011 07:06:08 -0400 (EDT) Message-Id: <201107261106.HAA09210 at smc.vnet.net> From: Jack L Goldberg 1 <jackgold at umich.edu> Subject: [mg120494] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101514 As long as we are talking about poor written English, a particularly annoying habit of Wolfram (or his editors) is the use of the word "essentially" throughout his tome, "Mathematica". It appears so often that it both disturbing and unessential (so to speak) :-) Jack Quoting Richard Fateman <fateman at cs.berkeley.edu>: > > Can you start a paragraph with "And"? > > http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > > says, 'No.' > > > Stephen Wolfram often does so, and I find it annoying. > example > http://www.wolframscience.com/nksonline/page-42?firstview=1 > > This construction seems to have been removed from the online documentation. > > > --RJF > > > > From mathgroup-adm at smc.vnet.net Tue Jul 26 05:22:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 84C2E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:22:42 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAMgIh018808; Tue, 26 Jul 2011 05:22:43 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9D238BF47C; Tue, 26 Jul 2011 05:22:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 118F2BF471; Tue, 26 Jul 2011 05:22:42 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09282 for mathgroup-newout; Tue, 26 Jul 2011 07:07:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09277 for mathgroup-newsend; Tue, 26 Jul 2011 07:07:24 -0400 (EDT) Date: Tue, 26 Jul 2011 07:07:24 -0400 (EDT) Message-Id: <201107261107.HAA09277 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120501] Re: Simplify[ArcTan[Tan[a] + Tan[b]]] References: <j0jk6s$ovj$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101514 On Mon, 25 Jul 2011 12:31:40 +0100, rych <rychphd at gmail.com> wrote: > Can't Mathematica tell anything about ArcTan[Tan[a] + Tan[b]]? Maybe > there exists no useful identity for that? By useful I mean the > expression with functions of the "angles" a and b other than tangents. > Thanks > Igor It can certainly tell you something: In[1] := f = Function[{expr}, 100 Count[expr, _Tan, {0, Infinity}] + 100 Count[expr, _ArcTan, {0, Infinity}] + LeafCount[expr] ]; In[2] := FullSimplify[ ArcTan[Tan[a] + Tan[b]], ComplexityFunction -> f ] Out[2] = 1/2 I (Log[1-I Sec[a] Sec[b] Sin[a+b]]-Log[1+I Sec[a] Sec[b] Sin[a+b]]) However, this result is arguably neither interesting nor useful. Best, O. R. From mathgroup-adm at smc.vnet.net Tue Jul 26 05:25:17 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B33B56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:25:17 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAPILi019652; Tue, 26 Jul 2011 05:25:19 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id E7A63BF471; Tue, 26 Jul 2011 05:25:18 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 84507A8110; Tue, 26 Jul 2011 05:25:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09187 for mathgroup-newout; Tue, 26 Jul 2011 07:05:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09182 for mathgroup-newsend; Tue, 26 Jul 2011 07:05:25 -0400 (EDT) Date: Tue, 26 Jul 2011 07:05:25 -0400 (EDT) Message-Id: <201107261105.HAA09182 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120490] Re: And now for something completely different References: <j0jk9o$ovv$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101514 On Mon, 25 Jul 2011 12:33:12 +0100, Richard Fateman <fateman at cs.berkeley.edu> wrote: > Can you start a paragraph with "And"? > > http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > > says, 'No.' > > Stephen Wolfram often does so, and I find it annoying. > example > http://www.wolframscience.com/nksonline/page-42?firstview=1 > > This construction seems to have been removed from the online > documentation. > > --RJF A curious choice of topic for this mailing list, if I may say so. Nevertheless, I do agree with you that Stephen Wolfram seems to have a rather awkward writing style. However, in my humble opinion, one should be wary of using Yahoo! Answers as a source, as it is populated almost entirely by trolls. Of course, I am sure you would not wish to be associated with such a thing. :-) Best, O. R. From mathgroup-adm at smc.vnet.net Tue Jul 26 05:26:49 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 48D366BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:26:49 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAQoEP019780; Tue, 26 Jul 2011 05:26:50 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 76EE4BF47C; Tue, 26 Jul 2011 05:26:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B5C1DBF471; Tue, 26 Jul 2011 05:26:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09291 for mathgroup-newout; Tue, 26 Jul 2011 07:07:36 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09286 for mathgroup-newsend; Tue, 26 Jul 2011 07:07:35 -0400 (EDT) Date: Tue, 26 Jul 2011 07:07:35 -0400 (EDT) Message-Id: <201107261107.HAA09286 at smc.vnet.net> From: ccarter at mit.edu Subject: [mg120502] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101514 And, how is this relevant to the group topic? And, for what it is worth: HAMLET ACT III SCENE I A room in the castle. [Enter KING CLAUDIUS, QUEEN GERTRUDE, POLONIUS, OPHELIA, ROSENCRANTZ, and GUILDENSTERN] KING CLAUDIUS And can you, by no drift of circumstance, Get from him why he puts on this confusion, Grating so harshly all his days of quiet With turbulent and dangerous lunacy? On Mon, 25 Jul 2011, Richard Fateman wrote: > Date: Mon, 25 Jul 2011 07:29:07 -0400 (EDT) > From: Richard Fateman <fateman at cs.berkeley.edu> > To: mathgroup at smc.vnet.net > Subject: And now for something completely different > > > Can you start a paragraph with "And"? > > http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > > says, 'No.' > > > Stephen Wolfram often does so, and I find it annoying. > example > http://www.wolframscience.com/nksonline/page-42?firstview=1 > > This construction seems to have been removed from the online documentation. > > > --RJF > > From mathgroup-adm at smc.vnet.net Tue Jul 26 05:29:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 772E76BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:29:42 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAThc0019998; Tue, 26 Jul 2011 05:29:43 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id B3A6DA814C; Tue, 26 Jul 2011 05:29:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E98DEA813D; Tue, 26 Jul 2011 05:29:41 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09181 for mathgroup-newout; Tue, 26 Jul 2011 07:05:15 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09176 for mathgroup-newsend; Tue, 26 Jul 2011 07:05:14 -0400 (EDT) Date: Tue, 26 Jul 2011 07:05:14 -0400 (EDT) Message-Id: <201107261105.HAA09176 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120489] Re: Grid Divider Style With Background Colors References: <201107251128.HAA25473 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101514 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1200_1299 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You could do something like With[{gap = 1, elemWidth=3, h = 8, w = 7}, mat = RandomInteger[10, {h, w}]; colours = Table[Blend[{Lighter[Blue], Pink}, j/w], {i, h}, {j, w}]; Framed[Grid[ MapThread[ Framed[Pane[#1, Scaled[1]], ImageMargins -> gap, Background -> #2] &, {mat, colours}, 2], Spacings -> {0, 0}, ItemSize -> elemWidth], FrameMargins -> gap]] elemWidth is the width of the elements in the Grid and gap the distance between the lines. Heike On 25 Jul 2011, at 12:28, Don wrote: > Mathematica permits divider lines between rows and columns in a table > (grid) such > as this example from the documentation: > > Grid[Table[x, {4}, {11}], Dividers -> {{{{True, False}}, -1 -> True}, > False}] > > But, the dividers are single lines only. > > Sometimes double line dividers are desired > as shown in this table on the Web: > > http://www.assetcorrelation.com/user/correlations/90 > > Notice that the background color for an item is only within > the inside line of a double line divider. > > Is there any way to produce (a) this kind of divider (double line) > and (b) with background colors for specific items that don't cross > the inside line of the double line divider? > > Thank you in advance. > > Don > From mathgroup-adm at smc.vnet.net Tue Jul 26 05:30:50 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BC7046BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:30:50 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAUqO4020216; Tue, 26 Jul 2011 05:30:52 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 04321A814C; Tue, 26 Jul 2011 05:30:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 4F1D4A813D; Tue, 26 Jul 2011 05:30:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09334 for mathgroup-newout; Tue, 26 Jul 2011 07:08:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09330 for mathgroup-newsend; Tue, 26 Jul 2011 07:08:29 -0400 (EDT) Date: Tue, 26 Jul 2011 07:08:29 -0400 (EDT) Message-Id: <201107261108.HAA09330 at smc.vnet.net> From: Murray Eisenberg <murray at math.umass.edu> Subject: [mg120507] Re: And now for something completely different Reply-To: murray at math.umass.edu References: <201107251129.HAA25514 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101514 Disallowing conjunctions such as "and" and "but" to introduce sentences is one of those prissy prohibitions promulgated by grammar police, especially in school. But it's quite common and acceptable today to violate that, at least in informal writing. And certainly in speaking. Yet the usage is long established in English: check the OED. And indeed Stephen Wolfram often does begin sentences with "and". Which you find annoying. But you seem to find so much that Stephen Wolfram does annoying, so why should this be any different? On 7/25/11 7:29 AM, Richard Fateman wrote: > Can you start a paragraph with "And"? > > http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > > says, 'No.' > > > Stephen Wolfram often does so, and I find it annoying. > example > http://www.wolframscience.com/nksonline/page-42?firstview=1 > > This construction seems to have been removed from the online documentation. > > > --RJF > -- Murray Eisenberg murray at math.umass.edu Mathematics & Statistics Dept. Lederle Graduate Research Tower phone 413 549-1020 (H) University of Massachusetts 413 545-2859 (W) 710 North Pleasant Street fax 413 545-1801 Amherst, MA 01003-9305 From mathgroup-adm at smc.vnet.net Tue Jul 26 05:33:27 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id DD84A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:33:26 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAXSwH020433; Tue, 26 Jul 2011 05:33:28 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 1C643A814C; Tue, 26 Jul 2011 05:33:28 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 3E0F0A813D; Tue, 26 Jul 2011 05:33:26 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09252 for mathgroup-newout; Tue, 26 Jul 2011 07:06:52 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09247 for mathgroup-newsend; Tue, 26 Jul 2011 07:06:51 -0400 (EDT) Date: Tue, 26 Jul 2011 07:06:51 -0400 (EDT) Message-Id: <201107261106.HAA09247 at smc.vnet.net> From: Paul von Hippel <paulvonhippel at yahoo.com> Subject: [mg120498] Re: TransformedDistribution -- odd problem Reply-To: Paul von Hippel <paulvonhippel at yahoo.com> References: <j0gh7s$bd7$1 at smc.vnet.net> <201107251129.HAA25532 at smc.vnet.net> <4E2EA10E.813B.006A.0 at newcastle.edu.au> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.102414 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1300_1399 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FRAUD_WEBMAIL_REPLYTO 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. That problem went away, thanks. I upgraded to 8.0.1, and I learned that Mathematica can have trouble evaluating symbols with subscripts. ________________________________ From: Barrie Stokes <Barrie.Stokes at newcastle.edu.au> To: mathgroup at smc.vnet.net; paulvonhippel at yahoo <paulvonhippel at yahoo.com> Sent: Monday, July 25, 2011 8:12 PM Subject: [mg120498] Re: TransformedDistribution -- odd problem Hi Paul Could we see an example of "a more complicated example where Mathematica will give the mean of A and the mean of B, but when I ask for the mean of A+B Mathematica just echoes the input", please? Barrie >>> On 25/07/2011 at 9:29 pm, in message <201107251129.HAA25532 at smc.vnet.net>, paulvonhippel at yahoo <paulvonhippel at yahoo.com> wrote: > I also have a more complicated example where Mathematica will give the > mean of A and the mean of B, but when I ask for the mean of A+B > Mathematica just echoes the input. (Here A and B are complicated > functions of several random variables.) This strikes me as really odd, > since of course Mean(A+B)=Mean(A)+Mean(B). > > What could be going on here? Under what circumstances does Mathematica > echo the input when asked to provide a Mean? Is there a setting I need > to change? I suspect this is a software issue rather than a > mathematical issue. From mathgroup-adm at smc.vnet.net Tue Jul 26 05:34:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 999BE6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:34:52 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAYrRf021297; Tue, 26 Jul 2011 05:34:53 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id E7891BF471; Tue, 26 Jul 2011 05:34:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 4F747A8110; Tue, 26 Jul 2011 05:34:52 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09307 for mathgroup-newout; Tue, 26 Jul 2011 07:07:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09302 for mathgroup-newsend; Tue, 26 Jul 2011 07:07:57 -0400 (EDT) Date: Tue, 26 Jul 2011 07:07:57 -0400 (EDT) Message-Id: <201107261107.HAA09302 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at jmsb.concordia.ca> Subject: [mg120504] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.101815 Thank you, John. Excellent. Gregory On Mon, Jul 25, 2011, at 4:39 AM, jfultz at wolfram.com wrote: > On Fri, 22 Jul 2011 19:46:07 -0400 (EDT), Gregory Lypny wrote: > > Hi everyone, > > > > When I include fractions as inline math typesetting, they are scaled down > > to fit the effective line height of the cell. How can I prevent this or, > > I guess, make the line height automatically expand to accommodate the > > math? If my regular text in the cell is 12-point times, I'd like all > > math variables that are not subscripts or superscripts to be 12-point as > > well. > > > > Incidentally, other big typeset objects like matrices are not scaled > > down, or at least they down't appear to be. > > > > Sincerely, > > > > Gregory > > If you look in Core.nb, you'll find a style called "InlineCell". This style is > automatically applied to all inline cells everywhere. One of the options it has > set is: > > ScriptLevel->1 > > This is what's causing the behavior you're seeing. You can override this with a > custom stylesheet. For example, in a given notebook, you can make a private > override by doing Format->Edit Stylesheet..., and pasting and interpreting the > following cell expression at the end of the resulting stylesheet notebook: > > > Cell[StyleData["InlineCell"], ScriptLevel->0] > > > Sincerely, > > John Fultz > jfultz at wolfram.com > User Interface Group > Wolfram Research, Inc. > > and pasting and interpreting the following cell expression at the end of the resulting stylesheet notebook: Cell[StyleData["InlineCell"], ScriptLevel->0] Sincerely, John Fultzjfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Tue Jul 26 05:37:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 465246BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:37:26 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAbRBO021541; Tue, 26 Jul 2011 05:37:27 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 48656BF471; Tue, 26 Jul 2011 05:37:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 7A086A8110; Tue, 26 Jul 2011 05:37:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09193 for mathgroup-newout; Tue, 26 Jul 2011 07:05:36 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09188 for mathgroup-newsend; Tue, 26 Jul 2011 07:05:35 -0400 (EDT) Date: Tue, 26 Jul 2011 07:05:35 -0400 (EDT) Message-Id: <201107261105.HAA09188 at smc.vnet.net> From: Glenn Carlson <g.crlsn at gmail.com> Subject: [mg120491] Re: NDSolve in matrix form To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.102715 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Here's a more complicated example. The system is of the form A[i]'[t] + a[[i]] A[i][t] = Sum[G[t][[i]][[j]] A[j][t], {j,1,n}], where A is an array of solution functions with i = 1 to n. G[t][[]][[]] and a[[]] are specified arrays. Note how I can work with different numbers of solution functions just by assigning a different value to n and defining the inputs G, a, AInit, and tf. I'm still trying to make sense out why the single and double brackets have to be specified as they are, and why sometimes the index is after t and sometimes before t. Thanks to all. Glenn ----- ClearAll; n := 4 AInit := {1, 0, 0, 0}; G[t_] = {{0, t, 1, 0}, {0, 0, t, 1}, {1, 0, 0, t}, {t, 1, 0, 0}}; a = {5, 3, 2, 1}; tf := 5 (* Create a list of the solution functions excl. the argument t. *) Asol = Table[A[i], {i, 1, n}]; (* Create a list of ODEs and ICs for NDSolve. *) Table[Asol[[i]][t], {i, 1, n}]; eqns = Table[ Asol[[i]]'[t] + a[[i]] Asol[[i]][t] == Sum[G[t][[i]][[j]] Asol[[j]][t], {j, 1, n}], {i, 1, n}]; ic := Table[Asol[[i]][0] == AInit[[i]], {i, 1, n}]; sys = Join[eqns, ic]; Table[Asol[[i]]'[t] + a[[i]] Asol[[i]][t] == Sum[G[t][[i]][[j]] Asol[[j]][t], {j, 1, n}], {i, 1, n}] // MatrixForm Table[Asol[[i]][0] == AInit[[i]], {i, 1, n}] // MatrixForm solution1 = NDSolve[sys, Asol, {t, 0, tf}, MaxSteps -> Infinity] (* Create a list of solution functions incl. the argument t for ParametricPlot3D. *) (* fsolt=Table[A[i][t],{i,1,n}] ParametricPlot3D[Evaluate[fsolt/.solution1],{t,0,tf},PlotPoints->1000,ColorFunction->(ColorData["Rainbow"][#4]&)] *) (* Plot solutions as functions of time. *) (* Plot[Evaluate[A[1][t]/.solution1],{t,0,tf},PlotRange->{0,2}] Plot[Evaluate[A[2][t]/.solution1],{t,0,tf},PlotRange->{0,2}] Plot[Evaluate[A[3][t]/.solution1],{t,0,tf},PlotRange->{0,2}] Plot[Evaluate[A[4][t]/.solution1],{t,0,tf},PlotRange->{0,2}] *) Asolt = Table[A[i][t], {i, 1, n}]; Asum[t_] := Sum[(A[i][t] /. solution1), {i, 1, n}] Plot[{Evaluate[Asolt /. solution1], Asum[t]}, {t, 0, tf}, PlotRange -> Automatic] From mathgroup-adm at smc.vnet.net Tue Jul 26 05:38:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 71C0F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:38:59 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAd01A021643; Tue, 26 Jul 2011 05:39:00 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 46D5DA813D; Tue, 26 Jul 2011 05:39:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 34F39BF471; Tue, 26 Jul 2011 05:38:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09301 for mathgroup-newout; Tue, 26 Jul 2011 07:07:47 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09296 for mathgroup-newsend; Tue, 26 Jul 2011 07:07:46 -0400 (EDT) Date: Tue, 26 Jul 2011 07:07:46 -0400 (EDT) Message-Id: <201107261107.HAA09296 at smc.vnet.net> From: Jacopo Bertolotti <J.Bertolotti at utwente.nl> Subject: [mg120503] Roots of a Jacobi polynomial To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.102715 Dear MathGroup, Mathematica implements Jacobi polynomials as JacobiP[n,a,b,x] where n is the order of the polynomial. As it can be checked plotting it a Jacobi polynomial has n real roots in the interval [-1,1] and it goes rapidly to infinity outside this interval (at least when both a and b are >-1). The problem arise when you try to find the roots of such a polynomial for a relatively high value of n. As an example the command NSolve[JacobiP[20, -0.5, -0.5, x] == 0, x] correctly returns {{x -> -0.99702}, {x -> -0.972111}, {x -> -0.92418}, {x -> -0.852398}, {x -> -0.760555}, {x -> -0.649375}, {x -> -0.522529}, {x -> -0.382672}, {x -> -0.233449}, {x -> -0.0784582}, {x -> 0.0784591}, {x -> 0.233445}, {x -> 0.382684}, {x -> 0.522504}, {x -> 0.649423}, {x -> 0.760466}, {x -> 0.852539}, {x -> 0.924002}, {x -> 0.972267}, {x -> 0.996958}} while NSolve[JacobiP[25, -0.5, -0.5, x] == 0, x] gives {{x -> -1.01869}, {x -> -0.979859 - 0.0479527 I}, {x -> -0.979859 + 0.0479527 I}, {x -> -0.870962 - 0.070991 I}, {x -> -0.870962 + 0.070991 I}, {x -> -0.71378 - 0.0505783 I}, {x -> -0.71378 + 0.0505783 I}, {x -> -0.571283}, {x -> -0.486396}, {x -> -0.367829}, {x -> -0.248377}, {x -> -0.125513}, {x -> -0.0000434329}, {x -> 0.125442}, {x -> 0.2489}, {x -> 0.365644}, {x -> 0.496977}, {x -> 0.555743}, {x -> 0.717741- 0.0573399 I}, {x -> 0.717741+ 0.0573399 I}, {x -> 0.87423- 0.0652273 I}, {x -> 0.87423+ 0.0652273 I}, {x -> 0.977876- 0.0422422 I}, {x -> 0.977876+ 0.0422422 I}, {x -> 1.01494}} i.e. both complex roots and roots outside the [-1,1] interval. Substituting any of these values back into the polynomial easily show that these values are not roots at all. Also notice that using the command Root (e.g. Sort@Table[Root[JacobiP[25, -0.5, -0.5, x], i], {i, 1, 25}]) gives different but still wrong results. On a related note: NIntegrate sometimes gives wrong results when integrating function of the form (1-x)^a (1+x)^b f[x] and I feel this might related to the Gauss-Jacobi quadrature failing to retrieve the correct roots of a Jacobi polynomial. Do anyone have a solution for that? Thank you Jacopo From mathgroup-adm at smc.vnet.net Tue Jul 26 05:41:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BA9CF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:41:40 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAfg6K021957; Tue, 26 Jul 2011 05:41:42 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 11C72A814C; Tue, 26 Jul 2011 05:41:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 064DEFF003; Tue, 26 Jul 2011 05:41:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09238 for mathgroup-newout; Tue, 26 Jul 2011 07:06:41 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09233 for mathgroup-newsend; Tue, 26 Jul 2011 07:06:40 -0400 (EDT) Date: Tue, 26 Jul 2011 07:06:40 -0400 (EDT) Message-Id: <201107261106.HAA09233 at smc.vnet.net> From: Paul von Hippel <paulvonhippel at yahoo.com> Subject: [mg120497] Re: TransformedDistribution -- odd problem Reply-To: Paul von Hippel <paulvonhippel at yahoo.com> References: <j0gh7s$bd7$1 at smc.vnet.net> <201107251129.HAA25540 at smc.vnet.net> <4E2EA04E.813B.006A.0 at newcastle.edu.au> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.103314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P2 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FRAUD_WEBMAIL_REPLYTO 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Thanks -- that fixes it! Bonus question: if we don't specify v2>2, why doesn't Mathematica return a two part solution: k v2 / (v2-2) v2>2 Indeterminate True That's what it does if we request the mean of F -- why doesn't it do the same if we request the mean of k*F. ________________________________ From: Barrie Stokes <Barrie.Stokes at newcastle.edu.au> To: mathgroup at smc.vnet.net; paulvonhippel at yahoo <paulvonhippel at yahoo.com> Sent: Monday, July 25, 2011 8:09 PM Subject: [mg120497] Re: TransformedDistribution -- odd problem Hi Paul There are conditions on the v1 and v2, the degrees of freedom of the F distribution: Assuming[v2 > 2, Mean[TransformedDistribution[F , F \[Distributed] FRatioDistribution[v1, v2]]]] {Assuming[v2 > 2, Mean[TransformedDistribution[k*F , F \[Distributed] FRatioDistribution[v1, v2]]]], k*v2/(-2 + v2)} {Assuming[v2 > 2, Mean[TransformedDistribution[k + F , F \[Distributed] FRatioDistribution[v1, v2]]]], k + v2/(-2 + v2)} // FullSimplify which shows precisely what you expect for k*F and k+F. Cheers Barrie >>> On 25/07/2011 at 9:29 pm, in message <201107251129.HAA25540 at smc.vnet.net>, paulvonhippel at yahoo <paulvonhippel at yahoo.com> wrote: > A little more experimenting shows that the TransformedDistribution > function will also not provide the mean of k+F where k is a constant > and F has an F distribution -- i.e., > Mean[TransformedDistribution[k*F , F \[Distributed] > FRatioDistribution[v, v]]] > > If I changce the distribution of F to NormalDistribution or > ChiSquareDistribution, I can get a mean for k*F or k+F. So the problem > only occurs when I define a simple function of an F variable using the > TransformedDistribution function. > This all strikes me as very strange, and I'd be curious to know if > others can reproduce my results. If you can't reproduce my results, > I'd be interested in theories about why my results differ from yours. > E.g., is there a setting I should change in the software? > > I am using version 8.0.0.0 and looking to upgrade to 8.0.1, if that > makes a difference. > > Many thanks for any pointers. > > On Jul 24, 2:22 am, paulvonhippel at yahoo <paulvonhip... at yahoo.com> > wrote: >> I'm having a very strange problem with TransformedDistribution, where >> I can calculate the mean of an F distribution but I cannot calculate >> the mean of a constant multiplied by an F distribution. That is, if I >> type >> >> Mean[TransformedDistribution[F, F \[Distributed] >> FRatioDistribution[v, v]]] >> >> Mathematica gives me an answer. But if I type >> >> Mean[TransformedDistribution[k*F , F \[Distributed] >> FRatioDistribution[v, v]]] >> >> Mathematica just echoes the input. I swear I got an answer for the >> second expression earlier today. What am I doing wrong? From mathgroup-adm at smc.vnet.net Tue Jul 26 05:41:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 952B56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:41:46 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAfhTn021964; Tue, 26 Jul 2011 05:41:43 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 603E9BF42E; Tue, 26 Jul 2011 05:41:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E08D1A813D; Tue, 26 Jul 2011 05:41:41 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09202 for mathgroup-newout; Tue, 26 Jul 2011 07:05:47 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09197 for mathgroup-newsend; Tue, 26 Jul 2011 07:05:46 -0400 (EDT) Date: Tue, 26 Jul 2011 07:05:46 -0400 (EDT) Message-Id: <201107261105.HAA09197 at smc.vnet.net> From: Richard Fateman <fateman at eecs.berkeley.edu> Subject: [mg120492] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> <52E64356-FB20-4D6A-B89F-9125DD8B55B8 at wolfram.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.103314 On 7/25/2011 7:36 AM, Brett Champion wrote: > On Jul 25, 2011, at 6:29 AM, Richard Fateman wrote: > >> Can you start a paragraph with "And"? >> >> http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 >> >> says, 'No.' >> >> >> Stephen Wolfram often does so, and I find it annoying. >> example >> http://www.wolframscience.com/nksonline/page-42?firstview=1 >> > http://www.wolframscience.com/nksonline/page-849c-text?firstview=1 Thanks for the pointer! I now know that Wolfram knows that it will be annoying to some people. I find it interesting that on this particular page, striking out each of the "And"s at the beginning of the sentences has no negative consequences, at least as I read it. There is a reason, one that some may dismiss as pedantry, for removing the "And"s and fixing some of the other oddities of Wolfram's prose. That is, formal English discourse has sentences with "subject" and "predicate". They adhere to rules of syntax and can be formally diagrammed. Humans and (especially of interest to some people) computer programs can sometimes read and parse sentences, assign semantic interpretations, etc. Sentence fragments and "extra" words are not helpful. By the way, a sentence beginning with "But" which is not part of a subordinate clause is also a no-no traditionally... Using the word "And" at the beginning of a sentence to indicate that this sentence is related to the one before it should not be required since adjacent sentences in the same paragraph should be related. Adjacent paragraphs in the same chapter should be related as well, so they need not begin with "And". The occasional relaxation of rules as some kind of device or flourish may be effective. I find Wolfram's use of "And" to be annoying. But how did he know he would annoy me? RJF > > Other links, which show up above Yahoo! Answers in a Google search: > > http://wiki.answers.com/Q/Can_you_start_a_sentence_with_the_word_And > http://www.dailywritingtips.com/can-you-start-sentences-with-?and?-and-?but?/ > http://www.gpuss.co.uk/english_usage/start_sentence_conjunction.htm > > Brett From mathgroup-adm at smc.vnet.net Tue Jul 26 05:42:47 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 31AD26BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:42:47 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAgm5S022082; Tue, 26 Jul 2011 05:42:48 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 722D6A8110; Tue, 26 Jul 2011 05:42:48 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id CCD52BF42E; Tue, 26 Jul 2011 05:42:46 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09313 for mathgroup-newout; Tue, 26 Jul 2011 07:08:08 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09308 for mathgroup-newsend; Tue, 26 Jul 2011 07:08:08 -0400 (EDT) Date: Tue, 26 Jul 2011 07:08:08 -0400 (EDT) Message-Id: <201107261108.HAA09308 at smc.vnet.net> From: Richard Fateman <fateman at eecs.berkeley.edu> Subject: [mg120505] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> <alpine.LRH.2.00.1107250900100.19262 at pruffle.mit.edu> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.103314 On 7/25/2011 6:12 AM, ccarter at mit.edu wrote: > And, how is this relevant to the group topic? > > And, for what it is worth: > > HAMLET > ACT III > SCENE I A room in the castle. > [Enter KING CLAUDIUS, QUEEN GERTRUDE, POLONIUS, > OPHELIA, ROSENCRANTZ, and GUILDENSTERN] > > KING CLAUDIUS And can you, by no drift of circumstance, > Get from him why he puts on this confusion, > Grating so harshly all his days of quiet > With turbulent and dangerous lunacy? One can find arguments on both sides, e.g. http://www.dailywritingtips.com/can-you-start-sentences-with-%E2%80%9Cand%E2%80%9D-and-%E2%80%9Cbut%E2%80%9D/ For example, I find the quote from Shakespeare to be non- annoying, perhaps because as "spoken" English it is informal, it is not repetitive, and in verse. Presumably Shakespeare had some motive based on cadence. On the other hand, your first sentence beginning with "And" is grating, though understandable as humor/snark.. The second one actually operates as a conjunction, sort of. Email probably falls into the category of "informal", so some syntax might be more relaxed. I have noticed many of my colleagues begin all their initial sentences with "So, .." perhaps as a way of clearing their throats and seeing if their voices still work. A reference claiming that this originated in Microsoft, is, in my opinion, bogus: http://boingboing.net/2010/06/17/origins-of-using-so.html As for why this is relevant: I was reading some documentation for Mathematica. And it had a link to Wolfram's A New Kind of Science. :) RJF > > > On Mon, 25 Jul 2011, Richard Fateman wrote: > >> Date: Mon, 25 Jul 2011 07:29:07 -0400 (EDT) >> From: Richard Fateman <fateman at cs.berkeley.edu> >> To: mathgroup at smc.vnet.net >> Subject: And now for something completely different >> >> >> Can you start a paragraph with "And"? >> >> http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 >> >> says, 'No.' >> >> >> Stephen Wolfram often does so, and I find it annoying. >> example >> http://www.wolframscience.com/nksonline/page-42?firstview=1 >> >> This construction seems to have been removed from the online >> documentation. >> >> >> --RJF >> >> From mathgroup-adm at smc.vnet.net Tue Jul 26 05:42:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D427C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Tue, 26 Jul 2011 05:42:59 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6QAh1nJ022151; Tue, 26 Jul 2011 05:43:01 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id B4DEAA8110; Tue, 26 Jul 2011 05:43:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id EB3C2BF42E; Tue, 26 Jul 2011 05:42:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09260 for mathgroup-newout; Tue, 26 Jul 2011 07:07:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA09255 for mathgroup-newsend; Tue, 26 Jul 2011 07:07:02 -0400 (EDT) Date: Tue, 26 Jul 2011 07:07:02 -0400 (EDT) Message-Id: <201107261107.HAA09255 at smc.vnet.net> From: DANA DELOUIS <dana01 at me.com> Subject: [mg120499] Re: FinancialData still broken To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.26.103314 Hi. Here's some added thoughts on the issue you bring up. I added some stocks just in case the issue is related to mutual funds. stocks = {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX=94, "JNGIX=94, "JNGLX", "JNMCX=94, "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX=94, "STRFX=94, "AAPL", "IBM", "INTL", "VZ", "GE"}; I've noticed that if I ask for price about 100 times, then about 80% of the time I get a correct value, and 20% an incorrect value (n*^8). Here, a value of 8.91 was returned 77 times, or 77% (out of 100 tries) f[n_]:=Table[FinancialData[stocks[[n]],"Price"],{100}]//Tally//Sort f[1] {{8.91,77},{5.032406*10^8,23}} This took a little while, but I did it 100 times on each stock. m=Table[f[j],{j,stocks//Length}]; m//TableForm Here's a count of the successful returns: good=m[[All,1,-1]] {76,74,77,77,87,77,90,79,81,82,76,79,79,77,85,77,80,78,76,81} Here's the Mean and SD. As you can see, there's only about a 80% success rate, with a small Stand Deviation. {Mean[good],StandardDeviation[good]}//N {79.4, 4.031455} With such a consistent failure rate, it sounds like a communication problem between servers Out of curiosity, here are the different values that were high. I don't see any pattern to these nonsense values. m[[All,2,1]]//Union 5.031051*10^8 5.031396*10^8 5.031565*10^8 5.031669*10^8 5.031676*10^8 5.031677*10^8 5.031678*10^8 5.032022*10^8 5.032406*10^8 5.055450*10^8 5.055453*10^8 5.055455*10^8 5.055456*10^8 5.055457*10^8 Thanks for bringing this up. = = = = = = = = = = Dana DeLouis $Version 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: Erroneous prices are randomly returned: FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} {8.81, 72.4, 14., 10.64, 46.49, 12.48, 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, 5.03241*10^8, 11.04, 31.44, 32.47} FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} Bobby -- DrMajor... at yahoo.com From mathgroup-adm at smc.vnet.net Wed Jul 27 04:17:45 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 31B4A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:17:45 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9HkCd008133; Wed, 27 Jul 2011 04:17:46 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 1DBD8FF006; Wed, 27 Jul 2011 04:17:46 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 764FDFF007; Wed, 27 Jul 2011 04:17:44 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21080 for mathgroup-newout; Wed, 27 Jul 2011 06:10:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21069 for mathgroup-newsend; Wed, 27 Jul 2011 06:10:53 -0400 (EDT) Date: Wed, 27 Jul 2011 06:10:53 -0400 (EDT) Message-Id: <201107271010.GAA21069 at smc.vnet.net> From: "Max Böhring" <texuser at arcor.de> Subject: [mg120509] Path variable To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.90314 Hi, how do I delete a mistakenly added folder from the $Path variable? Thanks, Max From mathgroup-adm at smc.vnet.net Wed Jul 27 04:18:03 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 5F87A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:18:03 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9I4Vm008173; Wed, 27 Jul 2011 04:18:04 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id B6F43FF006; Wed, 27 Jul 2011 04:18:04 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 5CDEFFF004; Wed, 27 Jul 2011 04:18:03 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21054 for mathgroup-newout; Wed, 27 Jul 2011 06:10:42 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21049 for mathgroup-newsend; Wed, 27 Jul 2011 06:10:42 -0400 (EDT) Date: Wed, 27 Jul 2011 06:10:42 -0400 (EDT) Message-Id: <201107271010.GAA21049 at smc.vnet.net> From: Jay Bee <jiri.bocan at gmail.com> Subject: [mg120508] Re: Simplify[ArcTan[Tan[a] + Tan[b]]] References: <j0jk6s$ovj$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.90314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_100_199 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Since tg(a) + tg(b) = sin(a+b)/[cos(a)*cos(b)] = tg(a+b)*[1-tg(a)*tg(b)] = [tg(a)*tg(b)]*[cotg(a) + cotg(b)] maybe Mathematica is right... From mathgroup-adm at smc.vnet.net Wed Jul 27 04:18:10 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 248256BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:18:10 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9IBU4008187; Wed, 27 Jul 2011 04:18:11 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 705D0A8176; Wed, 27 Jul 2011 04:18:11 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 96F4BA8158; Wed, 27 Jul 2011 04:18:09 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21140 for mathgroup-newout; Wed, 27 Jul 2011 06:11:26 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21135 for mathgroup-newsend; Wed, 27 Jul 2011 06:11:25 -0400 (EDT) Date: Wed, 27 Jul 2011 06:11:25 -0400 (EDT) Message-Id: <201107271011.GAA21135 at smc.vnet.net> From: Leo Ditolaghi <leoditolaghi at gmail.com> Subject: [mg120512] Re: And now for something completely different References: <j0jk9o$ovv$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.90314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_10_99 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. And really, gentlemen. ;-) Leo From mathgroup-adm at smc.vnet.net Wed Jul 27 04:19:43 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 859D46BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:19:43 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9JiN9008260; Wed, 27 Jul 2011 04:19:44 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 92AEAA80E4; Wed, 27 Jul 2011 04:19:44 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 21AB1FF003; Wed, 27 Jul 2011 04:19:43 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21217 for mathgroup-newout; Wed, 27 Jul 2011 06:13:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21212 for mathgroup-newsend; Wed, 27 Jul 2011 06:13:14 -0400 (EDT) Date: Wed, 27 Jul 2011 06:13:14 -0400 (EDT) Message-Id: <201107271013.GAA21212 at smc.vnet.net> From: Bob Hanlon <hanlonr at cox.net> Subject: [mg120522] Re: work the way I want it to. Reply-To: hanlonr at cox.net To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.90314 Input it as a List, i.e., include the List brackets: {1,2,3,4,5} Bob Hanlon ---- JonSilverman <jonsilverman2006 at gmail.com> wrote: ============= When prompted for an input by Input[], I want to input a list of numbers. But when i try to enter more than one number I get something like this: RowBox[{"45", ",", "65", ",", "56"}] What is that? If I added spaces then the space got automatically turned into a multiplication sign! How can I enter a list at the input prompt? From mathgroup-adm at smc.vnet.net Wed Jul 27 04:21:33 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3EFF96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:21:33 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9LY5L008490; Wed, 27 Jul 2011 04:21:34 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 1BA22FF004; Wed, 27 Jul 2011 04:21:34 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 80234FF009; Wed, 27 Jul 2011 04:21:32 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21280 for mathgroup-newout; Wed, 27 Jul 2011 06:14:41 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21275 for mathgroup-newsend; Wed, 27 Jul 2011 06:14:40 -0400 (EDT) Date: Wed, 27 Jul 2011 06:14:40 -0400 (EDT) Message-Id: <201107271014.GAA21275 at smc.vnet.net> From: "E. Frauendorfer" <he.frauendorfer at t-online.de> Subject: [mg120530] File directory To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91214 Hi, I am often working in two kernels with Mathematica Programs coming from different directories also from different drives. After working some time, I very often don't remember the origin of a particular open program. On opening a notebook the name of the program always appears on top of the notebook, but not the origin. In my latest installation of Mathematica (8.01 on Win 7, 64 bit) I am no longer able to find the origin of an open program. Please tell, how to recover this feature. Thanks E.F. From mathgroup-adm at smc.vnet.net Wed Jul 27 04:23:41 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2643C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:23:41 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9Ng9n008611; Wed, 27 Jul 2011 04:23:42 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 377C1FF003; Wed, 27 Jul 2011 04:23:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D05E1A80E4; Wed, 27 Jul 2011 04:23:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21235 for mathgroup-newout; Wed, 27 Jul 2011 06:13:36 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21230 for mathgroup-newsend; Wed, 27 Jul 2011 06:13:35 -0400 (EDT) Date: Wed, 27 Jul 2011 06:13:35 -0400 (EDT) Message-Id: <201107271013.GAA21230 at smc.vnet.net> From: Simon <simonjtyler at gmail.com> Subject: [mg120524] Re: Can't make Input[] work the way I want it to. Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91214 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_500_599 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Put brackets {} around the input. 1,2,3 is not a good Mathematica expression, so Input can only return the Box expression. You could do some simple syntax checking to find when an expression like "1,2,3" (x=RowBox[{"1", ",", "2", ",", "3"}]) has been entered and then fix it using, e.g., ToExpression@RowBox[{"{", x, "}"}] Or you could prompt for the correct form using something like x = Input["Input a list", {Placeholder[Subscript["e", 1]], Placeholder[Subscript["e", 2]], Placeholder[\[Ellipsis]]}] From mathgroup-adm at smc.vnet.net Wed Jul 27 04:25:44 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1566E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:25:44 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9Pjj2009273; Wed, 27 Jul 2011 04:25:45 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 62ECBFF006; Wed, 27 Jul 2011 04:25:45 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D698FA80E4; Wed, 27 Jul 2011 04:25:43 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21203 for mathgroup-newout; Wed, 27 Jul 2011 06:12:53 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21198 for mathgroup-newsend; Wed, 27 Jul 2011 06:12:52 -0400 (EDT) Date: Wed, 27 Jul 2011 06:12:52 -0400 (EDT) Message-Id: <201107271012.GAA21198 at smc.vnet.net> From: roby <roby.nowak at gmail.com> Subject: [mg120520] SystemDialogInput["RecordSound"] automatisation To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91214 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_600_699 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, OEM_SOFTWARE_X1 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __OEM_SOFTWARE_1 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Hi all. Is it possible to automate the call to SystemDialogInput["RecordSound"] (Windows XP SP3) ? Normaly when SystemDialogInput["RecordSound"] is evaluated a dialog pops up and the user must interactivly select a recording device as well as the record format. After the selcetion has been done the user must click the recod button and finaly the stop button and the ok button to obtain a recorded sample. I would like to select the device and format by passing them as paramters to SystemDialogInput["RecordSound"] and then start the recording for a specifyed time interval. Any hints ? Regards Robert From mathgroup-adm at smc.vnet.net Wed Jul 27 04:27:41 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A73776BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:27:41 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9Rh44009429; Wed, 27 Jul 2011 04:27:43 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id F1FF6A8176; Wed, 27 Jul 2011 04:27:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 25ED2A8158; Wed, 27 Jul 2011 04:27:41 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21249 for mathgroup-newout; Wed, 27 Jul 2011 06:13:58 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21244 for mathgroup-newsend; Wed, 27 Jul 2011 06:13:57 -0400 (EDT) Date: Wed, 27 Jul 2011 06:13:57 -0400 (EDT) Message-Id: <201107271013.GAA21244 at smc.vnet.net> From: PAR123 <reiser.paul at gmail.com> Subject: [mg120526] Why won't this sum evaluate? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91214 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_600_699 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. In[120]:= $Version Out[120]= "7.0 for Mac OS X x86 (32-bit) (January 30, 2009)" In[122]:= Sum[c^n/(1 + c^(2*n)), {n, 1, Infinity}] Out[122]= -(1/4) + 1/4 EllipticTheta[3, 0, c]^2 In[123]:= Sum[c^n/(1 + c^(2*n)), {n, 0, Infinity}] Out[123]= (won't simplify) The only thing different in the two sums is that the second sum is from 0 to Infinity rather than 1 to Infinity. Clearly, the n=zero term is 1/2. I have tried various Regularizations and Methods, (not exhaustively) but none seem to work on either of the sums, much less the last. A side problem - Is there a way to determine what Regularization and Method were used when none were specified? Thanks From mathgroup-adm at smc.vnet.net Wed Jul 27 04:29:51 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 67EA36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:29:51 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9TqcZ009589; Wed, 27 Jul 2011 04:29:52 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 9FCD1A8158; Wed, 27 Jul 2011 04:29:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id ED0DBA813D; Wed, 27 Jul 2011 04:29:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21257 for mathgroup-newout; Wed, 27 Jul 2011 06:14:08 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21252 for mathgroup-newsend; Wed, 27 Jul 2011 06:14:08 -0400 (EDT) Date: Wed, 27 Jul 2011 06:14:08 -0400 (EDT) Message-Id: <201107271014.GAA21252 at smc.vnet.net> From: Yves Klett <yves.klett at googlemail.com> Subject: [mg120527] Re: And now for something completely different References: <j0jk9o$ovv$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91214 Funny enough that an author who is clearly concerned about too many "help vampires" should post messages that are clearly off-topic. Nevertheless, he do does so, and I find it annoying. Yves Am 25.07.2011 13:33, schrieb Richard Fateman: > Can you start a paragraph with "And"? > > http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > > says, 'No.' > > > Stephen Wolfram often does so, and I find it annoying. > example > http://www.wolframscience.com/nksonline/page-42?firstview=1 > > This construction seems to have been removed from the online documentation. > > > --RJF > From mathgroup-adm at smc.vnet.net Wed Jul 27 04:31:31 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9C3256BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:31:31 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9VWHr009868; Wed, 27 Jul 2011 04:31:32 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id B8129A80E4; Wed, 27 Jul 2011 04:31:32 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 4F254FF006; Wed, 27 Jul 2011 04:31:31 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21287 for mathgroup-newout; Wed, 27 Jul 2011 06:14:52 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21282 for mathgroup-newsend; Wed, 27 Jul 2011 06:14:51 -0400 (EDT) Date: Wed, 27 Jul 2011 06:14:51 -0400 (EDT) Message-Id: <201107271014.GAA21282 at smc.vnet.net> From: "Christoph Lhotka" <christoph.lhotka at univie.ac.at> Subject: [mg120531] Re: work the way I want it to. To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91815 hello, if you enter 45,65,56 into the input dialog it is converted to a rowbox, if you enter it as 45 65 56 it is assumed to be the expression 45*65*56, finally if you enter it as {45,65,56} it will be seen as a list of numbers. think of typing it directly into your notebook...it is the usual notation best, christoph On 26/07/2011 13:06, JonSilverman wrote: > When prompted for an input by Input[], I want to input a list of > numbers. But when i try to enter more than one number I get something > like this: > > RowBox[{"45", ",", "65", ",", "56"}] > > > What is that? > > If I added spaces then the space got automatically turned into a > multiplication sign! > > How can I enter a list at the input prompt? From mathgroup-adm at smc.vnet.net Wed Jul 27 04:34:01 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A54D36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:34:01 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9XvD5009998; Wed, 27 Jul 2011 04:34:02 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id E643BA80E4; Wed, 27 Jul 2011 04:33:57 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 65609FF003; Wed, 27 Jul 2011 04:33:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21134 for mathgroup-newout; Wed, 27 Jul 2011 06:11:15 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21129 for mathgroup-newsend; Wed, 27 Jul 2011 06:11:14 -0400 (EDT) Date: Wed, 27 Jul 2011 06:11:14 -0400 (EDT) Message-Id: <201107271011.GAA21129 at smc.vnet.net> From: "Ted Ersek" <ersekt at md.metrocast.net> Subject: [mg120511] Genomes Mathematica knows about and how to use them? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91815 I know someone who is a researcher in biochemistry and I wanted to show them how Mathematica could be useful in their research. I read somewhere that besides the human genome, Mathematica has the genome of a certain species of mouse and fruit fly in its curated data. Then I figured Mathematica might also have the genomes of the bacteria they research in its curated data. How does one find out what genomes are included in curated data that comes with Mathematica? Once you know a certain genome besides the human genome is available, how do you access it? If one is going to Import a genome from a source independent of Wolfram Research, what are likely file formats one would Import? Thanks, Ted Ersek From mathgroup-adm at smc.vnet.net Wed Jul 27 04:35:45 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4F6476BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:35:45 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9Zk72010128; Wed, 27 Jul 2011 04:35:46 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 8F308FF004; Wed, 27 Jul 2011 04:35:46 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id BE2E1FF003; Wed, 27 Jul 2011 04:35:44 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21155 for mathgroup-newout; Wed, 27 Jul 2011 06:11:48 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21150 for mathgroup-newsend; Wed, 27 Jul 2011 06:11:47 -0400 (EDT) Date: Wed, 27 Jul 2011 06:11:47 -0400 (EDT) Message-Id: <201107271011.GAA21150 at smc.vnet.net> From: Gilmar Rodriguez-pierluissi <peacenova at yahoo.com> Subject: [mg120514] Fusing two 3-D surfaces To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.91815 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. How can I "fuse" the following two 3-D surfaces, as a single 3-D surface? I need to join them where the downward funnel of plt1 meets the upward funnel of plt2; as a single 3-D surface. plt1= Plot3D[-1/(x^2 + y^2 + 0.5), {x, -2, 2}, {y, -5, 5}, PlotStyle -> Directive[Orange, Specularity[White, 40]], Boxed -> False, Axes -> False, Mesh -> False, ImageSize -> 500, ViewPoint -> {-22.197, 0.387, 11.0}] plt2 = ParametricPlot3D[{E^(v/(2 Sqrt[3])) Sqrt[u] Cos[1/2 (v - Sqrt[3] Log[u])], E^(v/(2 Sqrt[3])) Sqrt[u] Sin[1/2 (v - Sqrt[3] Log[u])], E^(-(v/Sqrt[3]))/u}, {u, .1, 5}, {v, -3, 3}, PlotStyle -> Directive[Orange, Specularity[White, 40]], Boxed -> False, Axes -> False, Mesh -> False , ViewPoint -> {-22.197, 0.387, 11.0}] Thank you for your help! Gilmar Rodriguez-Pierluissi From mathgroup-adm at smc.vnet.net Wed Jul 27 04:38:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id CA5C66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:38:16 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9cHob010388; Wed, 27 Jul 2011 04:38:18 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id CC6F5FF006; Wed, 27 Jul 2011 04:38:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 44E7AFF004; Wed, 27 Jul 2011 04:38:16 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21243 for mathgroup-newout; Wed, 27 Jul 2011 06:13:47 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21238 for mathgroup-newsend; Wed, 27 Jul 2011 06:13:46 -0400 (EDT) Date: Wed, 27 Jul 2011 06:13:46 -0400 (EDT) Message-Id: <201107271013.GAA21238 at smc.vnet.net> From: Simon <simonjtyler at gmail.com> Subject: [mg120525] Re: And now for something completely different Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.92115 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_900_999 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_NOT_1 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. As other people have already mentioned; in informal or conversational writing, starting a sentence with "And" is fine. That said, the writing style of NKS does not annoy me, because I never got around to reading it! This thread does remind me, however, of the infamous "Lord" Timothy Dexter. To quote from: http://en.wikipedia.org/wiki/Timothy_Dexter """ At the age of 50 he wrote a book about himself - A Pickle for the Knowing Ones or Plain Truth in a Homespun Dress. He wrote about himself and complained about politicians, clergy and his wife. The book contained 8,847 words and 33,864 letters, but no punctuation, and capital letters were seemingly random. At first he handed his book out for free, but it became popular and was re-printed in eight editions. In the second edition Dexter added an extra page which consisted of 13 lines of punctuation marks. Dexter instructed readers to "peper and solt it as they plese". """" Simon From mathgroup-adm at smc.vnet.net Wed Jul 27 04:39:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 200976BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:39:35 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9daQg010437; Wed, 27 Jul 2011 04:39:36 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 63AB9FF003; Wed, 27 Jul 2011 04:39:36 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 9C6DCBF47C; Wed, 27 Jul 2011 04:39:34 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21127 for mathgroup-newout; Wed, 27 Jul 2011 06:11:04 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21122 for mathgroup-newsend; Wed, 27 Jul 2011 06:11:04 -0400 (EDT) Date: Wed, 27 Jul 2011 06:11:04 -0400 (EDT) Message-Id: <201107271011.GAA21122 at smc.vnet.net> From: JUN <noeckel at gmail.com> Subject: [mg120510] Re: default font References: <201107251127.HAA25459 at smc.vnet.net> <j0m7cn$951$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.92115 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __INT_PROD_COMP 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_7 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I have the same issue on a computer with a high-resolution display - everything (not just text but also graphics) looks too small to me. So what I did is to change the setting in Preferences > Advanced > "Open Option Inspector" > Notebook Options > Display Options > Magnification I set the Magnification factor to 1.5 there. This factor affects the display of a Notebook even when its individual Magnification setting (as it appears on the status line) shows 100%; it's a factor that multiplies the size of displayed graphics as well as font size, so the relative proportions of the two don't change when you use the Notebook on different computers (with different display resolutions). Jens On Jul 26, 4:11 am, Heike Gramberg <heike.gramb... at gmail.com> wrote: > The default FontSize of a notebook is set by the global option FontSize. > You can change it by running something like > > SetOptions[$FrontEnd, FontSize -> 14] > > Heike. > > > > > > > > > everytime with new norebook i change font size. How to change it in > > default manner? From mathgroup-adm at smc.vnet.net Wed Jul 27 04:41:41 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D96166BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:41:41 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9fhR4010645; Wed, 27 Jul 2011 04:41:43 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 15FC5A813D; Wed, 27 Jul 2011 04:41:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 6089EA8140; Wed, 27 Jul 2011 04:41:41 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21225 for mathgroup-newout; Wed, 27 Jul 2011 06:13:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21220 for mathgroup-newsend; Wed, 27 Jul 2011 06:13:25 -0400 (EDT) Date: Wed, 27 Jul 2011 06:13:25 -0400 (EDT) Message-Id: <201107271013.GAA21220 at smc.vnet.net> From: Eli Fenichel <Eli.Fenichel at asu.edu> Subject: [mg120523] getting ride of 0.i To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93315 I am trying to use FindMinimum to minimize the square of a function over many variables (i.e., parameters). The function itself has the potential to generate imaginary numbers and involves numerical integration (the parameter values that minimize the function are real). For clarification the function in evaluated at multiple points so it can be written as vector. By squaring the vector the numerical values of the elements are always real with no imaginary parts. However, Mathematica often writes x + 0.i, where x is a some numerical value, for some of the elements. Typically, this can be ignored, the Chop command can be used, or it simply does not cause problems. However, I keep getting an error: [cid:image003.png at 01CC4BBC.E87A0F30] NIntegrate::nlim: "t = Y[1.] is not a valid limit of integration." Y is an array with the parameters to be minimized. However, if evaluate the objective function to be minimized using replacement rules I get x + 0.i. Is there a way for me tell Mathematica to always treat 0.i as 0 and drop it? It seems to be causing problems in the FindMinimum call. Thanks, Eli From mathgroup-adm at smc.vnet.net Wed Jul 27 04:43:36 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6A8246BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:43:36 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9hb7W010763; Wed, 27 Jul 2011 04:43:37 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 9909EFF003; Wed, 27 Jul 2011 04:43:37 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id A0609BF47C; Wed, 27 Jul 2011 04:43:35 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21271 for mathgroup-newout; Wed, 27 Jul 2011 06:14:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21266 for mathgroup-newsend; Wed, 27 Jul 2011 06:14:29 -0400 (EDT) Date: Wed, 27 Jul 2011 06:14:29 -0400 (EDT) Message-Id: <201107271014.GAA21266 at smc.vnet.net> From: Andrzej Kozlowski <akoz at mimuw.edu.pl> Subject: [mg120529] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> <201107261107.HAA09286 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93315 Or, perhaps this is even more appropriate ;-) : http://kingjbible.com/genesis/1.htm Andrzej Kozlowski On 26 Jul 2011, at 13:07, ccarter at mit.edu wrote: > And, how is this relevant to the group topic? > > And, for what it is worth: > > HAMLET > ACT III > SCENE I A room in the castle. > [Enter KING CLAUDIUS, QUEEN GERTRUDE, POLONIUS, > OPHELIA, ROSENCRANTZ, and GUILDENSTERN] > > KING CLAUDIUS And can you, by no drift of circumstance, > Get from him why he puts on this confusion, > Grating so harshly all his days of quiet > With turbulent and dangerous lunacy? > > > > On Mon, 25 Jul 2011, Richard Fateman wrote: > >> Date: Mon, 25 Jul 2011 07:29:07 -0400 (EDT) >> From: Richard Fateman <fateman at cs.berkeley.edu> >> To: mathgroup at smc.vnet.net >> Subject: And now for something completely different >> >> >> Can you start a paragraph with "And"? >> >> http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 >> >> says, 'No.' >> >> >> Stephen Wolfram often does so, and I find it annoying. >> example >> http://www.wolframscience.com/nksonline/page-42?firstview=1 >> >> This construction seems to have been removed from the online = documentation. >> >> >> --RJF >> >> > From mathgroup-adm at smc.vnet.net Wed Jul 27 04:45:56 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 92FCA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:45:56 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9jvb4011002; Wed, 27 Jul 2011 04:45:57 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 64401BF480; Wed, 27 Jul 2011 04:45:57 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 08889A813D; Wed, 27 Jul 2011 04:45:55 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21263 for mathgroup-newout; Wed, 27 Jul 2011 06:14:19 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21258 for mathgroup-newsend; Wed, 27 Jul 2011 06:14:18 -0400 (EDT) Date: Wed, 27 Jul 2011 06:14:18 -0400 (EDT) Message-Id: <201107271014.GAA21258 at smc.vnet.net> From: Ted Sariyski <tsariysk at craft-tech.com> Subject: [mg120528] Re: how to ListPlot3D large data sets References: <201107232354.TAA08712 at smc.vnet.net> <201107251130.HAA25558 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.92115 Hi, In one attempt MaxPlotPoints did not help, but I was not persistent because I have to resolve other issues before I return to ListPlot3D. One issue is that I cannot pack data. On the big data set I verify that it is numeric array and still I cannot get it packed. Here is an example: mydata={{0.00100,10.,0.},{0.00100,10.,0.00100},{0.00100,10.,0.00200},{0.00100,10.,0.00300},{0.00100,10.,0.00400}}; MatrixQ[mydata,NumericQ] True myPackedData=ToPackedArray[mydata,Real]; MatrixQ[myPackedData, NumericQ] True PackedArrayQ[myPackedData] False What I am doing wrong? Thanks, --Ted On 7/25/2011 7:30 AM, Oliver Ruebenkoenig wrote: > On Sat, 23 Jul 2011, Ted Sariyski wrote: > >> Hi, >> I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a data >> set with many millions of records. I was not able to get an image from the >> full dataset, it takes forever. If I use e.g. every fifth record, although >> slow, I get an image. The machine running Mathematica is Windows 7 (64 bit), >> has 24 GB RAM and there was no swapping. I wonder what is considered as a >> reasonable data size for ListPlot3D and are there other tools in Mathematica >> for visualization of large data sets? >> Thanks in advance, >> --Ted >> >> >> > Ted, > > is your data packed? > > Developer`PackedArrayQ[yourData] > > Oliver > From mathgroup-adm at smc.vnet.net Wed Jul 27 04:47:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 91A116BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:47:46 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9llMD011164; Wed, 27 Jul 2011 04:47:47 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id B953EA8140; Wed, 27 Jul 2011 04:47:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 16F9CA813D; Wed, 27 Jul 2011 04:47:46 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21194 for mathgroup-newout; Wed, 27 Jul 2011 06:12:42 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21190 for mathgroup-newsend; Wed, 27 Jul 2011 06:12:41 -0400 (EDT) Date: Wed, 27 Jul 2011 06:12:41 -0400 (EDT) Message-Id: <201107271012.GAA21190 at smc.vnet.net> From: Armand Tamzarian <mike.honeychurch at gmail.com> Subject: [mg120519] Re: Grid Divider Style With Background Colors References: <201107251128.HAA25473 at smc.vnet.net> <j0m724$8va$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93315 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1400_1499 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 26, 9:05 pm, Heike Gramberg <heike.gramb... at gmail.com> wrote: > You could do something like > > With[{gap = 1, elemWidth=3, h = 8, w = 7}, > mat = RandomInteger[10, {h, w}]; > colours = Table[Blend[{Lighter[Blue], Pink}, j/w], {i, h}, {j, w}]; > Framed[Grid[ > MapThread[ > Framed[Pane[#1, Scaled[1]], ImageMargins -> gap, > Background -> #2] &, {mat, colours}, 2], Spacings -> {0, 0}, > ItemSize -> elemWidth], FrameMargins -> gap]] > > elemWidth is the width of the elements in the Grid and gap the distance between the lines. > > Heike > > On 25 Jul 2011, at 12:28, Don wrote: > > > > > > > > > Mathematica permits divider lines between rows and columns in a table > > (grid) such > > as this example from the documentation: > > > Grid[Table[x, {4}, {11}], Dividers -> {{{{True, False}}, -1 -> True}, > > False}] > > > But, the dividers are single lines only. > > > Sometimes double line dividers are desired > > as shown in this table on the Web: > > >http://www.assetcorrelation.com/user/correlations/90 > > > Notice that the background color for an item is only within > > the inside line of a double line divider. > > > Is there any way to produce (a) this kind of divider (double line) > > and (b) with background colors for specific items that don't cross > > the inside line of the double line divider? > > > Thank you in advance. > > > Don nicely done! From mathgroup-adm at smc.vnet.net Wed Jul 27 04:49:57 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 664A76BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:49:57 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9nrra011286; Wed, 27 Jul 2011 04:49:58 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 4AADDBF47F; Wed, 27 Jul 2011 04:49:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 71A81BF47C; Wed, 27 Jul 2011 04:49:51 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21161 for mathgroup-newout; Wed, 27 Jul 2011 06:11:58 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21156 for mathgroup-newsend; Wed, 27 Jul 2011 06:11:58 -0400 (EDT) Date: Wed, 27 Jul 2011 06:11:58 -0400 (EDT) Message-Id: <201107271011.GAA21156 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at jmsb.concordia.ca> Subject: [mg120515] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93315 Hello Mr. Fultz, Tried but it didn't work. I executed the command in the stylesheet notebook corresponding to the notebook I'm working with. Perhaps I've misunderstood. Also, not sure where to find Core.nb. Is it in the application package? Gregory Lypny > On Fri, 22 Jul 2011 19:46:07 -0400 (EDT), Gregory Lypny wrote: > > Hi everyone, > > > > When I include fractions as inline math typesetting, they are scaled down > > to fit the effective line height of the cell. How can I prevent this or, > > I guess, make the line height automatically expand to accommodate the > > math? If my regular text in the cell is 12-point times, I'd like all > > math variables that are not subscripts or superscripts to be 12-point as > > well. > > > > Incidentally, other big typeset objects like matrices are not scaled > > down, or at least they down't appear to be. > > > > Sincerely, > > > > Gregory > > If you look in Core.nb, you'll find a style called "InlineCell". This style is > automatically applied to all inline cells everywhere. One of the options it has > set is: > > ScriptLevel->1 > > This is what's causing the behavior you're seeing. You can override this with a > custom stylesheet. For example, in a given notebook, you can make a private > override by doing Format->Edit Stylesheet..., and pasting and interpreting the > following cell expression at the end of the resulting stylesheet notebook: > > > Cell[StyleData["InlineCell"], ScriptLevel->0] > > > Sincerely, > > John Fultz > jfultz at wolfram.com > User Interface Group > Wolfram Research, Inc. > From mathgroup-adm at smc.vnet.net Wed Jul 27 04:51:20 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1D5A36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:51:20 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9pLAn011425; Wed, 27 Jul 2011 04:51:21 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 5B2D3A813D; Wed, 27 Jul 2011 04:51:21 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id BEEA4A80E4; Wed, 27 Jul 2011 04:51:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21210 for mathgroup-newout; Wed, 27 Jul 2011 06:13:04 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21204 for mathgroup-newsend; Wed, 27 Jul 2011 06:13:03 -0400 (EDT) Date: Wed, 27 Jul 2011 06:13:03 -0400 (EDT) Message-Id: <201107271013.GAA21204 at smc.vnet.net> From: Bob Hanlon <hanlonr at cox.net> Subject: [mg120521] Re: Roots of a Jacobi polynomial Reply-To: hanlonr at cox.net To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93315 Don't use machine precision eqn1 = JacobiP[25, -1/2, -1/2, x] == 0; soln1 = NSolve[eqn1, x, WorkingPrecision -> 15]; Length[soln1] 25 And @@ (eqn1 /. soln1) True And @@ (-1 < # < 1 & /@ (x /. soln1)) True eqn2 = JacobiP[25, -0.5`20, -0.5`20, x] == 0; soln2 = NSolve[eqn2, x, WorkingPrecision -> 15]; soln1 == soln2 True Bob Hanlon ---- Jacopo Bertolotti <J.Bertolotti at utwente.nl> wrote: ============= Dear MathGroup, Mathematica implements Jacobi polynomials as JacobiP[n,a,b,x] where n is the order of the polynomial. As it can be checked plotting it a Jacobi polynomial has n real roots in the interval [-1,1] and it goes rapidly to infinity outside this interval (at least when both a and b are >-1). The problem arise when you try to find the roots of such a polynomial for a relatively high value of n. As an example the command NSolve[JacobiP[20, -0.5, -0.5, x] == 0, x] correctly returns {{x -> -0.99702}, {x -> -0.972111}, {x -> -0.92418}, {x -> -0.852398}, {x -> -0.760555}, {x -> -0.649375}, {x -> -0.522529}, {x -> -0.382672}, {x -> -0.233449}, {x -> -0.0784582}, {x -> 0.0784591}, {x -> 0.233445}, {x -> 0.382684}, {x -> 0.522504}, {x -> 0.649423}, {x -> 0.760466}, {x -> 0.852539}, {x -> 0.924002}, {x -> 0.972267}, {x -> 0.996958}} while NSolve[JacobiP[25, -0.5, -0.5, x] == 0, x] gives {{x -> -1.01869}, {x -> -0.979859 - 0.0479527 I}, {x -> -0.979859 + 0.0479527 I}, {x -> -0.870962 - 0.070991 I}, {x -> -0.870962 + 0.070991 I}, {x -> -0.71378 - 0.0505783 I}, {x -> -0.71378 + 0.0505783 I}, {x -> -0.571283}, {x -> -0.486396}, {x -> -0.367829}, {x -> -0.248377}, {x -> -0.125513}, {x -> -0.0000434329}, {x -> 0.125442}, {x -> 0.2489}, {x -> 0.365644}, {x -> 0.496977}, {x -> 0.555743}, {x -> 0.717741- 0.0573399 I}, {x -> 0.717741+ 0.0573399 I}, {x -> 0.87423- 0.0652273 I}, {x -> 0.87423+ 0.0652273 I}, {x -> 0.977876- 0.0422422 I}, {x -> 0.977876+ 0.0422422 I}, {x -> 1.01494}} i.e. both complex roots and roots outside the [-1,1] interval. Substituting any of these values back into the polynomial easily show that these values are not roots at all. Also notice that using the command Root (e.g. Sort@Table[Root[JacobiP[25, -0.5, -0.5, x], i], {i, 1, 25}]) gives different but still wrong results. On a related note: NIntegrate sometimes gives wrong results when integrating function of the form (1-x)^a (1+x)^b f[x] and I feel this might related to the Gauss-Jacobi quadrature failing to retrieve the correct roots of a Jacobi polynomial. Do anyone have a solution for that? Thank you Jacopo From mathgroup-adm at smc.vnet.net Wed Jul 27 04:51:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9E3CF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:51:42 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9phTT011519; Wed, 27 Jul 2011 04:51:43 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id E9546A8140; Wed, 27 Jul 2011 04:51:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 6C3EAA8158; Wed, 27 Jul 2011 04:51:42 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21170 for mathgroup-newout; Wed, 27 Jul 2011 06:12:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21165 for mathgroup-newsend; Wed, 27 Jul 2011 06:12:08 -0400 (EDT) Date: Wed, 27 Jul 2011 06:12:08 -0400 (EDT) Message-Id: <201107271012.GAA21165 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120516] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93915 Looks like there's a minor bug in the updating mechanism. Perhaps this is what you ran into. If, after following my procedure, you save, close, and reopen the notebook, you'll see that the change has taken effect. Core.nb is inside the Mathematica layout, but it's generally not a good idea to be changing things there. If you're hoping to make the change globally for all notebooks on your system, let me know and I can walk you through that procedure. However, doing so will not change the notebook when viewed on somebody else's system, where as the Format->Edit Stylesheet... change will persist with the notebook regardless of which system it's viewed on. Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. On Tue, 26 Jul 2011 14:10:44 -0400, Gregory Lypny wrote: > Hello Mr. Fultz, > > Tried but it didn't work. I executed the command in the stylesheet > notebook corresponding to the notebook I'm working with. Perhaps I've > misunderstood. Also, not sure where to find Core.nb. Is it in the > application package? > > > Gregory Lypny > > >> On Fri, 22 Jul 2011 19:46:07 -0400 (EDT), Gregory Lypny wrote: >>> Hi everyone, >>> >>> When I include fractions as inline math typesetting, they are scaled >>> down >>> to fit the effective line height of the cell. How can I prevent this >>> or, >>> I guess, make the line height automatically expand to accommodate the >>> math? If my regular text in the cell is 12-point times, I'd like all >>> math variables that are not subscripts or superscripts to be 12-point >>> as >>> well. >>> >>> Incidentally, other big typeset objects like matrices are not scaled >>> down, or at least they down't appear to be. >>> >>> Sincerely, >>> >>> Gregory >>> >> If you look in Core.nb, you'll find a style called "InlineCell". This >> style is >> automatically applied to all inline cells everywhere. One of the >> options it has >> set is: >> >> ScriptLevel->1 >> >> This is what's causing the behavior you're seeing. You can override >> this with a >> custom stylesheet. For example, in a given notebook, you can make a >> private >> override by doing Format->Edit Stylesheet..., and pasting and >> interpreting the >> following cell expression at the end of the resulting stylesheet >> notebook: >> >> >> Cell[StyleData["InlineCell"], ScriptLevel->0] >> >> >> Sincerely, >> >> John Fultz >> jfultz at wolfram.com >> User Interface Group >> Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Wed Jul 27 04:53:39 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9C7456BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:53:39 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9relo011621; Wed, 27 Jul 2011 04:53:40 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 4CCDDA8140; Wed, 27 Jul 2011 04:53:40 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D337CA80E4; Wed, 27 Jul 2011 04:53:38 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21305 for mathgroup-newout; Wed, 27 Jul 2011 06:15:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21300 for mathgroup-newsend; Wed, 27 Jul 2011 06:15:13 -0400 (EDT) Date: Wed, 27 Jul 2011 06:15:13 -0400 (EDT) Message-Id: <201107271015.GAA21300 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120533] Re: FinancialData still broken Reply-To: drmajorbob at yahoo.com References: <201107261107.HAA09255 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93915 Interesting!! I had thought the failure rate was lower, but I had noticed the erroneous prices had several different values. I've considered computing tighter acceptable ranges for each stock, but so far it appears sufficient to reject anything > 10^8 and repeat the call until I get a usable answer. I have no proof that smaller errors are not getting through unnoticed, of course. Sigh... Bobby On Tue, 26 Jul 2011 06:07:02 -0500, DANA DELOUIS <dana01 at me.com> wrote: > > Hi. Here's some added thoughts on the issue you bring up. > I added some stocks just in case the issue is related to mutual funds. > > stocks = {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX=94, > "JNGIX=94, > "JNGLX", "JNMCX=94, "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX=94, > "STRFX=94, "AAPL", "IBM", "INTL", "VZ", "GE"}; > > I've noticed that if I ask for price about 100 times, then about 80% of > the time I get a correct value, > and 20% an incorrect value (n*^8). > Here, a value of 8.91 was returned 77 times, or 77% (out of 100 tries) > > f[n_]:=Table[FinancialData[stocks[[n]],"Price"],{100}]//Tally//Sort > > f[1] > {{8.91,77},{5.032406*10^8,23}} > > This took a little while, but I did it 100 times on each stock. > > m=Table[f[j],{j,stocks//Length}]; > m//TableForm > > Here's a count of the successful returns: > > good=m[[All,1,-1]] > {76,74,77,77,87,77,90,79,81,82,76,79,79,77,85,77,80,78,76,81} > > Here's the Mean and SD. > As you can see, there's only about a 80% success rate, with a small > Stand Deviation. > > {Mean[good],StandardDeviation[good]}//N > {79.4, 4.031455} > > With such a consistent failure rate, it sounds like a communication > problem between servers > > Out of curiosity, here are the different values that were high. > I don't see any pattern to these nonsense values. > > m[[All,2,1]]//Union > > 5.031051*10^8 > 5.031396*10^8 > 5.031565*10^8 > 5.031669*10^8 > 5.031676*10^8 > 5.031677*10^8 > 5.031678*10^8 > 5.032022*10^8 > 5.032406*10^8 > 5.055450*10^8 > 5.055453*10^8 > 5.055455*10^8 > 5.055456*10^8 > 5.055457*10^8 > > Thanks for bringing this up. > > = = = = = = = = = = > Dana DeLouis > $Version > 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) > > > > On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: > Erroneous prices are randomly returned: > > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > "PTTAX", "RGACX", "STRFX"} > > {8.81, 72.4, 14., 10.64, 46.49, 12.48, > 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, > 5.03241*10^8, 11.04, 31.44, 32.47} > > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > "PTTAX", "RGACX", "STRFX"} > > {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, > 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, > 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} > > Bobby > > -- > DrMajor... at yahoo.com > > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Wed Jul 27 04:54:56 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AE7E56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:54:56 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9swn6011726; Wed, 27 Jul 2011 04:54:58 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id B9BB3A8140; Wed, 27 Jul 2011 04:54:57 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id EDDDAA813D; Wed, 27 Jul 2011 04:54:55 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21185 for mathgroup-newout; Wed, 27 Jul 2011 06:12:31 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21180 for mathgroup-newsend; Wed, 27 Jul 2011 06:12:30 -0400 (EDT) Date: Wed, 27 Jul 2011 06:12:30 -0400 (EDT) Message-Id: <201107271012.GAA21180 at smc.vnet.net> From: Armand Tamzarian <mike.honeychurch at gmail.com> Subject: [mg120518] Re: FinancialData still broken References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93915 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODY_SIZE_3000_3999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P5 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __LINES_OF_YELLING 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_1 0, __STOCK_PHRASE_6 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 24, 10:26 am, DrMajorBob <btre... at austin.rr.com> wrote: > I usually don't see the "price > 10^8" bug, either. It may have been > permanently gone by the time you looked for it. But it was there for a day > or so. > > I know the occasional spurious Missing coming back is a months-old issue > at least, and Dan Delouis confirmed it still exists. > > I've inoculated my code against both bugs, so I may not notice when they > go away. > > Bobby Would it be easier to just get the data from Yahoo rather than have to worry about fixes and innoculations? > > On Sat, 23 Jul 2011 01:29:09 -0500, James Stein <mathgr... at stein.org> > wrote: > > > > > > > > > > > > > DANA DELOUIS wrote: > > I really hope they fix this soon, but I guess they never issue bug fixes. > > > Are these bugs in Mathematica, or bugs in Yahoo? > > FWIW, I do not see the bug reported by the OP (DrMajorBob). > > > On Fri, Jul 22, 2011 at 4:44 PM, DANA DELOUIS <dana.... at gmail.com> wrote: > > >> ...> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8... > > >> Hi. This function has lots of problems. > >> In addition to the problems you point out, here's a slightly different > >> view. > >> Sometimes the Price, and Latest Price match. > >> Other times, the Price is corrupt, but the latest price is correct, and > >> sometimes it's the other way around. > >> Sometimes the CIK codes or Exchange are missing, etc. > >> Other issues are bugs in Option pricing, etc. > >> I really hope they fix this soon, but I guess they never issue bug > >> fixes. > > >> stocks={"ACEIX","FCNTX","JACNX","JANFX","JANWX","JMSCX","JNGIX","JNGLX", > >> "JNMCX=94, > >> "JNOSX","JNSGX","JNSTX","PTTAX","RGACX","STRFX=94}; > > >> Transpose[ > >> { > >> Map[FinancialData[#,"Price"]&,stocks], > >> Map[FinancialData[#,"LatestTrade"]&,stocks], > >> Map[FinancialData[#,"CIK"]&,stocks], > >> Map[FinancialData[#,"Company"]&,stocks] > >> }][[;;6]] > > >> < Just the first 6 for posting > >> < Looks better in MatrixForm, or something similar...> > > >> {5.0324*10^8,{Missing[NotAvailable],5.0324*10^8},0000080832,Van Kampen > >> Equity Income Fund A} > >> {5.0311*10^8,{{2011,7,20,17,11,0.},72.17},0000024238,Fidelity Contra > >> Fund} > >> {13.97,{{2011,7,20,17,50,0.},13.97},0000277751,Janus Contrarian Fund D > >> Shares} > >> {5.0324*10^8,{{2001,12,22,20,42,0.},5.0324*10^8},0000277751,Janus > >> Flexible > >> Bond Fund D Shar} > >> {5.0324*10^8,{{2011,7,20,18,24,0.},46.74},0000277751,Janus Worldwide > >> Fund D > >> Shares} > >> {12.48,{{2011,7,20,17,51,0.},12.48},Missing[NotAvailable],Janus Smart > >> Portfolio Conservat} > > >> = = = = = = = = = = > >> Dana DeLouis > >> $Version > >> 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) > > >> On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: > >> > Erroneous prices are randomly returned: > > >> > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > >> > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > >> > "PTTAX", "RGACX", "STRFX"} > > >> > {8.81, 72.4, 14., 10.64, 46.49, 12.48, > >> > 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, > >> > 5.03241*10^8, 11.04, 31.44, 32.47} > > >> > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", > >> > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", > >> > "PTTAX", "RGACX", "STRFX"} > > >> > {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, > >> > 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, > >> > 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} > > >> > Bobby > > >> > -- > >> > DrMajor... at yahoo.com > > -- > DrMajor... at yahoo.com From mathgroup-adm at smc.vnet.net Wed Jul 27 04:55:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6B2D16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:55:46 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9tl6N012276; Wed, 27 Jul 2011 04:55:47 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 7BEE1A813D; Wed, 27 Jul 2011 04:55:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 79DB5A80E4; Wed, 27 Jul 2011 04:55:45 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21297 for mathgroup-newout; Wed, 27 Jul 2011 06:15:03 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21292 for mathgroup-newsend; Wed, 27 Jul 2011 06:15:02 -0400 (EDT) Date: Wed, 27 Jul 2011 06:15:02 -0400 (EDT) Message-Id: <201107271015.GAA21292 at smc.vnet.net> From: Darren Glosemeyer <darreng at wolfram.com> Subject: [mg120532] Re: TransformedDistribution -- odd problem References: <j0gh7s$bd7$1 at smc.vnet.net> <201107251129.HAA25540 at smc.vnet.net> <4E2EA04E.813B.006A.0 at newcastle.edu.au> <201107261106.HAA09233 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93915 On 7/26/2011 6:06 AM, Paul von Hippel wrote: > Thanks -- that fixes it! > > Bonus question: if we don't specify v2>2, why doesn't Mathematica return a two part solution: > k v2 / (v2-2) v2>2 > > Indeterminate True > > That's what it does if we request the mean of F -- why doesn't it do the same if we request the mean of k*F. > > > > > ________________________________ > From: Barrie Stokes<Barrie.Stokes at newcastle.edu.au> > To: mathgroup at smc.vnet.net; paulvonhippel at yahoo<paulvonhippel at yahoo.com> > Sent: Monday, July 25, 2011 8:09 PM > Subject: Re: TransformedDistribution -- odd problem > > Hi Paul > > There are conditions on the v1 and v2, the degrees of freedom of the F distribution: > > Assuming[v2> 2, > Mean[TransformedDistribution[F , > F \[Distributed] FRatioDistribution[v1, v2]]]] > > {Assuming[v2> 2, > Mean[TransformedDistribution[k*F , > F \[Distributed] FRatioDistribution[v1, v2]]]], k*v2/(-2 + v2)} > > {Assuming[v2> 2, > Mean[TransformedDistribution[k + F , > F \[Distributed] FRatioDistribution[v1, v2]]]], > k + v2/(-2 + v2)} // FullSimplify > > which shows precisely what you expect for k*F and k+F. > > Cheers > > Barrie > >>>> On 25/07/2011 at 9:29 pm, in message<201107251129.HAA25540 at smc.vnet.net>, > paulvonhippel at yahoo<paulvonhippel at yahoo.com> wrote: >> A little more experimenting shows that the TransformedDistribution >> function will also not provide the mean of k+F where k is a constant >> and F has an F distribution -- i.e., >> Mean[TransformedDistribution[k*F , F \[Distributed] >> FRatioDistribution[v, v]]] >> >> If I changce the distribution of F to NormalDistribution or >> ChiSquareDistribution, I can get a mean for k*F or k+F. So the problem >> only occurs when I define a simple function of an F variable using the >> TransformedDistribution function. >> This all strikes me as very strange, and I'd be curious to know if >> others can reproduce my results. If you can't reproduce my results, >> I'd be interested in theories about why my results differ from yours. >> E.g., is there a setting I should change in the software? >> >> I am using version 8.0.0.0 and looking to upgrade to 8.0.1, if that >> makes a difference. >> >> Many thanks for any pointers. >> >> On Jul 24, 2:22 am, paulvonhippel at yahoo<paulvonhip... at yahoo.com> >> wrote: >>> I'm having a very strange problem with TransformedDistribution, where >>> I can calculate the mean of an F distribution but I cannot calculate >>> the mean of a constant multiplied by an F distribution. That is, if I >>> type >>> >>> Mean[TransformedDistribution[F, F \[Distributed] >>> FRatioDistribution[v, v]]] >>> >>> Mathematica gives me an answer. But if I type >>> >>> Mean[TransformedDistribution[k*F , F \[Distributed] >>> FRatioDistribution[v, v]]] >>> >>> Mathematica just echoes the input. I swear I got an answer for the >>> second expression earlier today. What am I doing wrong? The reason is internal processing in the general moment/expectation code. The result for mean of FRatioDistribution is hard-coded, while TransformDistribution has to go through more general code. In simple cases like shifting or rescaling by a constant, correctly propagating indeterminacies and infinities is fairly straightforward, but for more complicated transforms this may not be as easy. This is an area we will look at for improvement in the future. Darren Glosemeyer Wolfram Research From mathgroup-adm at smc.vnet.net Wed Jul 27 04:55:54 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2B1836BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:55:54 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9ttqr012294; Wed, 27 Jul 2011 04:55:55 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 1E668FF003; Wed, 27 Jul 2011 04:55:55 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 25E54BF47C; Wed, 27 Jul 2011 04:55:53 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21148 for mathgroup-newout; Wed, 27 Jul 2011 06:11:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21143 for mathgroup-newsend; Wed, 27 Jul 2011 06:11:36 -0400 (EDT) Date: Wed, 27 Jul 2011 06:11:36 -0400 (EDT) Message-Id: <201107271011.GAA21143 at smc.vnet.net> From: Daniel Lichtblau <danl at wolfram.com> Subject: [mg120513] Re: Roots of a Jacobi polynomial References: <201107261107.HAA09296 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.93915 On 07/26/2011 06:07 AM, Jacopo Bertolotti wrote: > Dear MathGroup, > Mathematica implements Jacobi polynomials as JacobiP[n,a,b,x] where n is > the order of the polynomial. As it can be checked plotting it a Jacobi > polynomial has n real roots in the interval [-1,1] and it goes rapidly > to infinity outside this interval (at least when both a and b are>-1). > The problem arise when you try to find the roots of such a polynomial > for a relatively high value of n. As an example the command > NSolve[JacobiP[20, -0.5, -0.5, x] == 0, x] correctly returns > > {{x -> -0.99702}, {x -> -0.972111}, {x -> -0.92418}, {x -> -0.852398}, > {x -> -0.760555}, {x -> -0.649375}, {x -> -0.522529}, {x -> -0.382672}, > {x -> -0.233449}, {x -> -0.0784582}, {x -> 0.0784591}, {x -> 0.233445}, > {x -> 0.382684}, {x -> 0.522504}, {x -> 0.649423}, {x -> 0.760466}, {x > -> 0.852539}, {x -> 0.924002}, {x -> 0.972267}, {x -> 0.996958}} > > while NSolve[JacobiP[25, -0.5, -0.5, x] == 0, x] gives > > {{x -> -1.01869}, {x -> -0.979859 - 0.0479527 I}, {x -> -0.979859 + > 0.0479527 I}, {x -> -0.870962 - 0.070991 I}, {x -> -0.870962 + 0.070991 > I}, {x -> -0.71378 - 0.0505783 I}, {x -> -0.71378 + 0.0505783 I}, {x -> > -0.571283}, {x -> -0.486396}, {x -> -0.367829}, {x -> -0.248377}, {x -> > -0.125513}, {x -> -0.0000434329}, {x -> 0.125442}, {x -> 0.2489}, {x -> > 0.365644}, {x -> 0.496977}, {x -> 0.555743}, {x -> 0.717741- 0.0573399 > I}, {x -> 0.717741+ 0.0573399 I}, {x -> 0.87423- 0.0652273 I}, {x -> > 0.87423+ 0.0652273 I}, {x -> 0.977876- 0.0422422 I}, {x -> 0.977876+ > 0.0422422 I}, {x -> 1.01494}} > > i.e. both complex roots and roots outside the [-1,1] interval. > Substituting any of these values back into the polynomial easily show > that these values are not roots at all. Also notice that using the > command Root (e.g. Sort@Table[Root[JacobiP[25, -0.5, -0.5, x], i], {i, > 1, 25}]) gives different but still wrong results. > On a related note: NIntegrate sometimes gives wrong results when > integrating function of the form (1-x)^a (1+x)^b f[x] and I feel this > might related to the Gauss-Jacobi quadrature failing to retrieve the > correct roots of a Jacobi polynomial. > > Do anyone have a solution for that? > > Thank you > > Jacopo This is not a well conditioned problem. To do better you'll need to allow NSolve to use higher precision by not giving machine numbers in the input. In[102]:= solns = Sort[NSolve[JacobiP[25, -1/2, -1/2, x] == 0, x]] Out[102]= {{x -> -0.998027}, {x -> -0.982287}, {x -> -0.951057}, {x \ -> -0.904827}, {x -> -0.844328}, {x -> -0.770513}, {x -> -0.684547}, \ {x -> -0.587785}, {x -> -0.481754}, {x -> -0.368125}, {x -> \ -0.24869}, {x -> -0.125333}, {x -> 0.}, {x -> 0.125333}, {x -> 0.24869}, {x -> 0.368125}, {x -> 0.481754}, {x -> 0.587785}, {x -> 0.684547}, {x -> 0.770513}, {x -> 0.844328}, {x -> 0.904827}, {x -> 0.951057}, {x -> 0.982287}, {x -> 0.998027}} These might seem imperfect when you check residuals (see below). In fact they are not at all bad. We first show that by comparing to higher precision versions that do validate fairly well as giving smallish residuals. In[104]:= solns30 = Sort[NSolve[JacobiP[25, -1/2, -1/2, x] == 0, x, WorkingPrecision -> 30]] Out[104]= {{x -> -0.998026728428271561952336806863}, {x -> \ -0.982287250728688681085641742865}, {x -> \ -0.951056516295153572116439333379}, {x -> \ -0.904827052466019527713668647933}, {x -> \ -0.844327925502015078548558063967}, {x -> \ -0.770513242775789230803009636396}, {x -> \ -0.684547105928688673732283357621}, {x -> \ -0.587785252292473129168705954639}, {x -> \ -0.481753674101715274987191502872}, {x -> \ -0.368124552684677959156947147493}, {x -> \ -0.248689887164854788242283746006}, {x -> \ -0.125333233564304245373118759817}, {x -> 0}, {x -> 0.125333233564304245373118759817}, {x -> 0.248689887164854788242283746006}, {x -> 0.368124552684677959156947147493}, {x -> 0.481753674101715274987191502872}, {x -> 0.587785252292473129168705954639}, {x -> 0.684547105928688673732283357621}, {x -> 0.770513242775789230803009636396}, {x -> 0.844327925502015078548558063967}, {x -> 0.904827052466019527713668647933}, {x -> 0.951056516295153572116439333379}, {x -> 0.982287250728688681085641742865}, {x -> 0.998026728428271561952336806863}} This shows the two results are quite close. In[106]:= Max[Abs[(x /. solns) - (x /. solns30)]] Out[106]= 4.47615*10^-10 This shows the high precision solutions give reasonable residuals. In[108]:= Max[Abs[JacobiP[25, -1/2, -1/2, x] /. solns30]] Out[108]= 0.*10^-12 The machine precision results will not give good residuals. There are two possible (and related) reasons. One is that the conditioning is such that we are bound to lose many digits in assessing residuals (as seems to happen above). The other is that the form of JacobiP polynomials might just be inducing cancellation error. Certainly this second item is part of the problem: In[109]:= Max[Abs[Expand[JacobiP[25, -1/2, -1/2, x]] /. solns30]] Out[109]= 0.*10^-21 Here are the corresponding machine precision evaluations of residuals. In[112]:= Max[Abs[JacobiP[25, -1/2, -1/2, x] /. solns]] Out[112]= 17. In[113]:= Max[Abs[Expand[JacobiP[25, -1/2, -1/2, x]] /. solns]] Out[113]= 9.31323*10^-9 Daniel Lichtblau Wolfram Research From mathgroup-adm at smc.vnet.net Wed Jul 27 04:57:43 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1FF716BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 04:57:43 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6R9vhZw012470; Wed, 27 Jul 2011 04:57:44 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 495D8BF47C; Wed, 27 Jul 2011 04:57:44 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 9D2C6A80E4; Wed, 27 Jul 2011 04:57:42 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21177 for mathgroup-newout; Wed, 27 Jul 2011 06:12:20 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA21171 for mathgroup-newsend; Wed, 27 Jul 2011 06:12:19 -0400 (EDT) Date: Wed, 27 Jul 2011 06:12:19 -0400 (EDT) Message-Id: <201107271012.GAA21171 at smc.vnet.net> From: "McHale, Paul" <Paul.McHale at excelitas.com> Subject: [mg120517] Re: CDF limitations and unclear professional strategy References: <201107220107.VAA16777 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.94214 >> Disappointed... >> So much things I heard about CDF applications, >> and then, well, I have to classify them as >> documents... Very powerful documents, and almost >> touching the application world but... just >> interactive documents for an OPEN market... I agree. CDF format is a PDF on steroids. It is designed to PUBLISH on the cheap. Admittedly, it is phenomenal for just a document reader. There are two things to do with Mathematica, publish papers or do work where work is defined as change to external data or task/report being based external data. I think for Mathematica to get to the next level, sharing documents must be only one focus. Engineers also use Mathematica to parse databases, read external files, process like a program and write data out. Sharing of these efforts via a common library would be very beneficial. Then again, they are just starting to approach the corporate/enterprise are na. Who knows what they have in mind. Paul Paul McHale | Electrical Engineer, Energetics Systems | Excelit as Technologies Corp. Phone: +1 937.865.3004 | Fax: +1 937.865.5170 | Mobile: +1 937.371.2828 1100 Vanguard Blvd, Miamisburg, Ohio 45342-0312 USA Paul.McHale at Excelitas.com www.excelitas.com Please consider the environment before printing this e-mail. This email message and any attachments are confidential and proprietary to Excelitas Technologies Corp. If you are not the intended recipient of this message, please inform the sender by replying to this email or sending a message to the sender and destroy the message and any attachments. Thank you -----Original Message----- From: Fonseca [mailto:public at fonseca.info] Sent: Thursday, July 21, 2011 9:07 PM To: mathgroup at smc.vnet.net Subject: [mg120517] CDF limitations and unclear professional strategy Disappointed... So much things I heard about CDF applications, and then, well, I have to classify them as documents... Very powerful documents, and almost touching the application world but... just interactive documents for an OPEN market... Somehow nothing new than what already existed. Not that it is bad (I personally have already commented a lot of good on the subject). The problem is that I'm still unable to see how could I use this in an cooperation environment. Let's suppose two different scenarios: 1. An application to be distributed to 100 colleagues of the same company, that, well, to make it simple, just needs to import a gif image, apply some sort of simple filter, and export it to a gif file. Very simple application, but not feasible. There isn't even concrete information on the subject (besides "please contact us"). Have contacted several times on the subject, and always no solution... Has this changed? Why so much mystery on the PROfessional use of this technology (this confirms what I keep hearing from others: academic, institutes, governments, etc, but not corporate...)? 100 special licenses for such a simple application? 2. Let's suppose I developed a package that does some awesome stuff, and really toke me some time to develop it. I use it to write a report for a client, and I want to give the report as an interactive document to the client (nothing could be better than CDF!). But the interaction needs my package (there's no way of previously generating all possible outputs). So, I can't send it to my client, since I risk having it copied to my competitors. Each client to whom I send a report needs a professional version? I mean, each person in the company of my client, and their consultant partners that will evaluate my report...? Or is this now the other way around: each report or report revision needs to be converted at Wolfram for pro functionalists activation on the standard player (I sign confidential agreements with my client...)? After all the announcements I have no idea what's the strategy. Did I missed some information on WR site? I just resent some questions to WR on the "please contact us", to see if something changed in the past couple of months (when I last insisted). Waiting for the answer, but why all the mystery on the PRO version? What can't WR figure out about a professional strategy? Can someone from Wolfram clarify this here for everyone? Is there a strategy for these two very common and simple examples of my world? Is this only meant for publishing documents on an OPEN environment, or on a direct revenue strategy (selling each document/application copy for a not so small price?). It's interesting that all the examples presented in the site are of very simple applications, but how can these simple application be used on a closed corporate environment, if the licensing of the applications cost more than their internal development cost? I'm completely in the dark... I know that I already asked this before, without great success (just one person answered), but, am I the only one here? Regards, P. Fonseca From mathgroup-adm at smc.vnet.net Wed Jul 27 06:14:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8E5E26BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 06:14:46 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6RBElIr024326; Wed, 27 Jul 2011 06:14:47 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id BA698BF42E; Wed, 27 Jul 2011 06:14:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 35EADA818D; Wed, 27 Jul 2011 06:14:46 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA23117 for mathgroup-newout; Wed, 27 Jul 2011 08:08:31 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA23112 for mathgroup-newsend; Wed, 27 Jul 2011 08:08:31 -0400 (EDT) Date: Wed, 27 Jul 2011 08:08:31 -0400 (EDT) Message-Id: <201107271208.IAA23112 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120535] Re: File directory References: <201107271014.GAA21275 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.110032 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_700_799 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You could do something like SetOptions[$FrontEnd, WindowTitle -> "FullFileName"] Heike On 27 Jul 2011, at 11:14, E. Frauendorfer wrote: > Hi, > > I am often working in two kernels with Mathematica Programs coming from different directories also from different drives. After working some time, I very > often don't remember the origin of a particular open program. > > On opening a notebook the name of the program always appears on top of > the notebook, but not the origin. In my latest installation of Mathematica (8.01 on Win 7, 64 bit) I am no longer able to find the origin of an open program. > > Please tell, how to recover this feature. > > > Thanks E.F. > From mathgroup-adm at smc.vnet.net Wed Jul 27 06:15:09 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EB8006BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Wed, 27 Jul 2011 06:15:08 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6RBFAxe024427; Wed, 27 Jul 2011 06:15:10 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 45E9AA81AA; Wed, 27 Jul 2011 06:15:10 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id EED96A818D; Wed, 27 Jul 2011 06:15:08 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA23110 for mathgroup-newout; Wed, 27 Jul 2011 08:08:21 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA23105 for mathgroup-newsend; Wed, 27 Jul 2011 08:08:19 -0400 (EDT) Date: Wed, 27 Jul 2011 08:08:19 -0400 (EDT) Message-Id: <201107271208.IAA23105 at smc.vnet.net> From: Yves Klett <yves.klett at googlemail.com> Subject: [mg120534] Re: File directory References: <j0ootl$ktp$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.27.110032 You can use NotebookDirectory[] to get the path to the current notebook. In 8.01 the Save-As-Dialog behaves not as expected and opens in the path of the last opened document as default instead of using the current document´s path. This results in widely scattered notebooks if you are not careful. Regards, Yves Am 27.07.2011 12:22, schrieb E. Frauendorfer: > Hi, > > I am often working in two kernels with Mathematica Programs coming from different directories also from different drives. After working some time, I very > often don't remember the origin of a particular open program. > > On opening a notebook the name of the program always appears on top of > the notebook, but not the origin. In my latest installation of Mathematica (8.01 on Win 7, 64 bit) I am no longer able to find the origin of an open program. > > Please tell, how to recover this feature. > > > Thanks E.F. > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:01:41 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3B36D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:01:41 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SB1gux026312; Thu, 28 Jul 2011 06:01:42 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id DEDCCA815B; Thu, 28 Jul 2011 06:01:41 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 42568FF003; Thu, 28 Jul 2011 06:01:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04058 for mathgroup-newout; Thu, 28 Jul 2011 07:54:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04053 for mathgroup-newsend; Thu, 28 Jul 2011 07:54:08 -0400 (EDT) Date: Thu, 28 Jul 2011 07:54:08 -0400 (EDT) Message-Id: <201107281154.HAA04053 at smc.vnet.net> From: Gregory Lypny <gregory.lypny at videotron.ca> Subject: [mg120541] How Can I Make Plot Options Conditional? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.104814 Hello everyone, Is there a preferred way to make plot options conditional? For Epilog points, for example, I've been using an IF statement within the Epilog list to determine whether the point size should be set to zero and therefore make the point invisible. Epilog -> {If[x >= xMin, PointSize[.02], PointSize[0]], Orange, Point[ptX]}, Gregory= From mathgroup-adm at smc.vnet.net Thu Jul 28 06:01:44 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E1B8B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:01:44 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SB1kN5026338; Thu, 28 Jul 2011 06:01:46 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 2D2E2A816B; Thu, 28 Jul 2011 06:01:46 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 2E167A815B; Thu, 28 Jul 2011 06:01:44 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04052 for mathgroup-newout; Thu, 28 Jul 2011 07:53:58 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04047 for mathgroup-newsend; Thu, 28 Jul 2011 07:53:58 -0400 (EDT) Date: Thu, 28 Jul 2011 07:53:58 -0400 (EDT) Message-Id: <201107281153.HAA04047 at smc.vnet.net> From: Zach Bjornson <zachb at wolfram.com> Subject: [mg120540] Re: Genomes Mathematica knows about and how to use them? References: <j0oobg$kmn$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.104814 The GenomeData function in Mathematica only has the human genome. However, there are a number of other genomes available via the WolframAlpha interface present in Mathematica 8. At the end of this blog post, there are some examples -- rat, zebra fish, mouse, drosophila, ... http://blog.wolframalpha.com/2010/03/10/did-you-know-that-wolframalpha-knows-your-dna/ Best, Zach W|A Computational Biology On 7/27/2011 3:13 AM, Ted Ersek wrote: > I know someone who is a researcher in biochemistry and I wanted to show them > how Mathematica could be useful in their research. I read somewhere that > besides the human genome, Mathematica has the genome of a certain species > of mouse and fruit fly in its curated data. Then I figured Mathematica > might also have the genomes of the bacteria they research in its curated > data. > > > > How does one find out what genomes are included in curated data that comes > with Mathematica? Once you know a certain genome besides the human genome > is available, how do you access it? > > > > If one is going to Import a genome from a source independent of Wolfram > Research, what are likely file formats one would Import? > > > > Thanks, > > Ted Ersek From mathgroup-adm at smc.vnet.net Thu Jul 28 06:02:03 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 406476BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:02:03 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SB248N026400; Thu, 28 Jul 2011 06:02:04 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 77163FF007; Thu, 28 Jul 2011 06:02:04 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E37DBA815B; Thu, 28 Jul 2011 06:02:02 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04134 for mathgroup-newout; Thu, 28 Jul 2011 07:55:50 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04128 for mathgroup-newsend; Thu, 28 Jul 2011 07:55:49 -0400 (EDT) Date: Thu, 28 Jul 2011 07:55:49 -0400 (EDT) Message-Id: <201107281155.HAA04128 at smc.vnet.net> From: "Berthold Hamburger" <b-hamburger at artinso.com> Subject: [mg120550] Timing progress bar To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.104814 Hi, Is there any possibility to get visible feedback about the progress of a calculation via the Timing function? Something like a progress bar or "% completed". Thanks Berthold -- Berthold Hamburger - Cellist/Spain <http://www.artinso.com/> http://www.artinso.com | <http://www.astronomy.artinso.com/> http://www.astronomy.artinso.com | <http://www.artemis.artinso.com/> http://www.artemis.artinso.com Visit me on Facebook <https://www.facebook.com/berthold.hamburger> From mathgroup-adm at smc.vnet.net Thu Jul 28 06:04:07 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id BD37E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:04:07 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SB48VV026798; Thu, 28 Jul 2011 06:04:08 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id CBE64FF007; Thu, 28 Jul 2011 06:04:08 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 77C3BA80BA; Thu, 28 Jul 2011 06:04:07 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04102 for mathgroup-newout; Thu, 28 Jul 2011 07:55:05 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04097 for mathgroup-newsend; Thu, 28 Jul 2011 07:55:04 -0400 (EDT) Date: Thu, 28 Jul 2011 07:55:04 -0400 (EDT) Message-Id: <201107281155.HAA04097 at smc.vnet.net> From: Helen Read <readhpr at gmail.com> Subject: [mg120546] Re: File directory References: <j0ootl$ktp$1 at smc.vnet.net> <j0ov4c$mie$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.104814 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_500_599 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On 7/27/2011 8:08 AM, Yves Klett wrote: > > In 8.01 the Save-As-Dialog behaves not as expected and opens in the path > of the last opened document as default instead of using the current > document's path. > > This results in widely scattered notebooks if you are not careful. That's something I really wish they would fix. A simple Save-As requires me to remember what directory the file is in, and sometimes I have to browse all over the place for it. It's a huge nuisance. -- Helen Read University of Vermont From mathgroup-adm at smc.vnet.net Thu Jul 28 06:05:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 026536BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:05:52 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SB5qxF027385; Thu, 28 Jul 2011 06:05:52 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id A85D0FF009; Thu, 28 Jul 2011 06:05:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 1A525FF004; Thu, 28 Jul 2011 06:05:51 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04024 for mathgroup-newout; Thu, 28 Jul 2011 07:53:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04020 for mathgroup-newsend; Thu, 28 Jul 2011 07:53:14 -0400 (EDT) Date: Thu, 28 Jul 2011 07:53:14 -0400 (EDT) Message-Id: <201107281153.HAA04020 at smc.vnet.net> From: "Christoph Lhotka" <christoph.lhotka at univie.ac.at> Subject: [mg120536] Re: File directory To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.104814 thats easy, just use {$MachineName, NotebookDirectory[]} to get the name of the computer and the absoulte file directory of the notebook in which you type in the command. best, christoph On 27/07/2011 12:14, E. Frauendorfer wrote: > Hi, > > I am often working in two kernels with Mathematica Programs coming from different directories also from different drives. After working some time, I very > often don't remember the origin of a particular open program. > > On opening a notebook the name of the program always appears on top of > the notebook, but not the origin. In my latest installation of Mathematica (8.01 on Win 7, 64 bit) I am no longer able to find the origin of an open program. > > Please tell, how to recover this feature. > > > Thanks E.F. > > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:08:07 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 0B1386BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:08:07 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SB88EU027700; Thu, 28 Jul 2011 06:08:08 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 3AAA7A8195; Thu, 28 Jul 2011 06:08:08 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D9DEEA816B; Thu, 28 Jul 2011 06:08:06 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04110 for mathgroup-newout; Thu, 28 Jul 2011 07:55:16 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04105 for mathgroup-newsend; Thu, 28 Jul 2011 07:55:15 -0400 (EDT) Date: Thu, 28 Jul 2011 07:55:15 -0400 (EDT) Message-Id: <201107281155.HAA04105 at smc.vnet.net> From: James Stein <mathgroup at stein.org> Subject: [mg120547] Re: File directory References: <201107271014.GAA21275 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.105714 On a Mac: command-click on the document name to see its complete hierarchy of containing folders. Surely Windows has a similar feature... On Wed, Jul 27, 2011 at 3:14 AM, E. Frauendorfer < he.frauendorfer at t-online.de> wrote: > Hi, > > I am often working in two kernels with Mathematica Programs coming from > different directories also from different drives. After working some time, I > very > often don't remember the origin of a particular open program. > > On opening a notebook the name of the program always appears on top of > the notebook, but not the origin. In my latest installation of Mathematica > (8.01 on Win 7, 64 bit) I am no longer able to find the origin of an open > program. > > Please tell, how to recover this feature. > > > Thanks E.F. > > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:10:01 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8E31F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:10:01 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBA2Tb028044; Thu, 28 Jul 2011 06:10:02 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id B68F3A8138; Thu, 28 Jul 2011 06:10:02 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 234E6A80BA; Thu, 28 Jul 2011 06:10:01 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04143 for mathgroup-newout; Thu, 28 Jul 2011 07:56:01 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04137 for mathgroup-newsend; Thu, 28 Jul 2011 07:56:00 -0400 (EDT) Date: Thu, 28 Jul 2011 07:56:00 -0400 (EDT) Message-Id: <201107281156.HAA04137 at smc.vnet.net> From: Richard Fateman <fateman at cs.berkeley.edu> Subject: [mg120551] Re: And now for something completely different References: <201107251129.HAA25514 at smc.vnet.net> <201107261107.HAA09286 at smc.vnet.net> <j0oosn$kte$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.105714 On 7/27/2011 3:22 AM, Andrzej Kozlowski wrote: > Or, perhaps this is even more appropriate ;-) : > > http://kingjbible.com/genesis/1.htm > > > Andrzej Kozlowski > I suppose SW would like NKS to be compared with the King James translation of the Bible. The KJV's version of Genesis tends to be rather poetical, and hardly the touchstone for conveying clarity to a modern reader. It does have verses beginning with "And". A good catch. However, the initial "And"s are lacking in more contemporary translations intended to express the clear content of the Bible to a modern English reader: e.g. http://net.bible.org/#!bible/Genesis+1:1 I see one spot though.. "And there was light." in that translation. For drama, don't you think? From mathgroup-adm at smc.vnet.net Thu Jul 28 06:11:57 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8F6F76BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:11:57 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBBwqk028346; Thu, 28 Jul 2011 06:11:58 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id B3D13A816B; Thu, 28 Jul 2011 06:11:58 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 16137A815B; Thu, 28 Jul 2011 06:11:57 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04118 for mathgroup-newout; Thu, 28 Jul 2011 07:55:29 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04113 for mathgroup-newsend; Thu, 28 Jul 2011 07:55:27 -0400 (EDT) Date: Thu, 28 Jul 2011 07:55:27 -0400 (EDT) Message-Id: <201107281155.HAA04113 at smc.vnet.net> From: Alexey Popkov <lehin.p at gmail.com> Subject: [mg120548] Why FullDefinition does not work in MathLink mode? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.110314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hello, When working with MathKernel in interactive session without of the FrontEnd, FullDefinition works as expected: In[1]:= a=2;FullDefinition[a] Out[1]= a = 2 But when trying to use it in MathLink mode one get ReturnPacket with unevaluated FullDefinition: In[1]:= kernel=LinkLaunch[First[$CommandLine] <> " -mathlink"]; LinkRead[kernel]; LinkWrite[kernel,Unevaluated[a=2;FullDefinition[a]]] LinkRead[kernel]//FullForm Out[4]//FullForm= ReturnPacket[FullDefinition[a]] The built-in parallelization functions have the same problem: In[2]:= ParallelEvaluate[a=2;FullDefinition[a]]//FullForm Out[2]//FullForm= List[FullDefinition[a],FullDefinition[a]] One workaround is to use ToString: In[3]:= ParallelEvaluate[a=2;ToString[FullDefinition[a]]] Out[3]= {a = 2,a = 2} Why FullDefinition returns unevaluated in MathLink session although it works as expected in interactive MathKernel session? Is it possible to make it working without any glitches? Any ideas? From mathgroup-adm at smc.vnet.net Thu Jul 28 06:14:07 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 49B8B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:14:07 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBE8ev028573; Thu, 28 Jul 2011 06:14:08 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 929A7A815B; Thu, 28 Jul 2011 06:14:08 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D95F4A80BA; Thu, 28 Jul 2011 06:14:06 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04124 for mathgroup-newout; Thu, 28 Jul 2011 07:55:39 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04119 for mathgroup-newsend; Thu, 28 Jul 2011 07:55:38 -0400 (EDT) Date: Thu, 28 Jul 2011 07:55:38 -0400 (EDT) Message-Id: <201107281155.HAA04119 at smc.vnet.net> From: James Stein <mathgroup at stein.org> Subject: [mg120549] Re: Genomes Mathematica knows about and how to use them? References: <201107271011.GAA21129 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.110314 Genomic data grows daily; many different archives exist, addressing different needs by people with keen interest. (I suspect different archives also have different conventions for metadata.) I doubt Wolfram could or should compete against such specialists. If a few genomes are available, it's likely for hobbyists. On Wed, Jul 27, 2011 at 3:11 AM, Ted Ersek <ersekt at md.metrocast.net> wrote: > I know someone who is a researcher in biochemistry and I wanted to show > them > how Mathematica could be useful in their research. I read somewhere that > besides the human genome, Mathematica has the genome of a certain species > of mouse and fruit fly in its curated data. Then I figured Mathematica > might also have the genomes of the bacteria they research in its curated > data. > > > > How does one find out what genomes are included in curated data that comes > with Mathematica? Once you know a certain genome besides the human genome > is available, how do you access it? > > > > If one is going to Import a genome from a source independent of Wolfram > Research, what are likely file formats one would Import? > > > > Thanks, > > Ted Ersek > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:15:47 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C62056BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:15:47 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBFnjX028775; Thu, 28 Jul 2011 06:15:49 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 10E3DA816B; Thu, 28 Jul 2011 06:15:49 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 24A9EA8195; Thu, 28 Jul 2011 06:15:47 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04066 for mathgroup-newout; Thu, 28 Jul 2011 07:54:21 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04061 for mathgroup-newsend; Thu, 28 Jul 2011 07:54:20 -0400 (EDT) Date: Thu, 28 Jul 2011 07:54:20 -0400 (EDT) Message-Id: <201107281154.HAA04061 at smc.vnet.net> From: Armand Tamzarian <mike.honeychurch at gmail.com> Subject: [mg120542] Re: getting ride of 0.i References: <j0oomv$krj$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.110314 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1200_1299 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 27, 8:19 pm, Eli Fenichel <Eli.Fenic... at asu.edu> wrote: > I am trying to use FindMinimum to minimize the square of a function over many variables (i.e., parameters). The function itself has the potential to generate imaginary numbers and involves numerical integration (the parameter values that minimize the function are real). For clarification the function in evaluated at multiple points so it can be written as vector. By squaring the vector the numerical values of the elements are always real with no imaginary parts. However, Mathematica often writes x + 0.i, where x is a some numerical value, for some of the elements. > > Typically, this can be ignored, the Chop command can be used, or it simply does not cause problems. However, I keep getting an error: [cid:image003.... at 01CC4BBC.E87A0F30] > > NIntegrate::nlim: "t = Y[1.] is not a valid limit of integration." > > Y is an array with the parameters to be minimized. > > However, if evaluate the objective function to be minimized using replacement rules I get > x + 0.i. > > Is there a way for me tell Mathematica to always treat 0.i as 0 and drop it? It seems to be causing problems in the FindMinimum call. > > Thanks, > Eli Re[3 + 2 I] From mathgroup-adm at smc.vnet.net Thu Jul 28 06:18:12 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D349F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:18:12 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBIE1d028976; Thu, 28 Jul 2011 06:18:14 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 27C71A8170; Thu, 28 Jul 2011 06:18:14 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 9B063A816B; Thu, 28 Jul 2011 06:18:12 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04151 for mathgroup-newout; Thu, 28 Jul 2011 07:56:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04146 for mathgroup-newsend; Thu, 28 Jul 2011 07:56:11 -0400 (EDT) Date: Thu, 28 Jul 2011 07:56:11 -0400 (EDT) Message-Id: <201107281156.HAA04146 at smc.vnet.net> From: Tomas Garza <tgarza10 at msn.com> Subject: [mg120552] Re: And now for something completely different To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.110614 And, could one quote a better example? -Tomas [This thread is now over - moderator] > Date: Wed, 27 Jul 2011 06:14:29 -0400 > From: akoz at mimuw.edu.pl > Subject: Re: And now for something completely different > To: mathgroup at smc.vnet.net > > Or, perhaps this is even more appropriate ;-) : > > http://kingjbible.com/genesis/1.htm > > > Andrzej Kozlowski > > > > > On 26 Jul 2011, at 13:07, ccarter at mit.edu wrote: > > > And, how is this relevant to the group topic? > > > > And, for what it is worth: > > > > HAMLET > > ACT III > > SCENE I A room in the castle. > > [Enter KING CLAUDIUS, QUEEN GERTRUDE, POLONIUS, > > OPHELIA, ROSENCRANTZ, and GUILDENSTERN] > > > > KING CLAUDIUS And can you, by no drift of circumstance, > > Get from him why he puts on this confusion, > > Grating so harshly all his days of quiet > > With turbulent and dangerous lunacy? > > > > > > > > On Mon, 25 Jul 2011, Richard Fateman wrote: > > > >> Date: Mon, 25 Jul 2011 07:29:07 -0400 (EDT) > >> From: Richard Fateman <fateman at cs.berkeley.edu> > >> To: mathgroup at smc.vnet.net > >> Subject: And now for something completely different > >> > >> > >> Can you start a paragraph with "And"? > >> > >> http://answers.yahoo.com/question/index?qid090413160418AAyfRO2 > >> > >> says, 'No.' > >> > >> > >> Stephen Wolfram often does so, and I find it annoying. > >> example > >> http://www.wolframscience.com/nksonline/page-42?firstview==1 > >> > >> This construction seems to have been removed from the online == > documentation. > >> > >> > >> --RJF > >> > >> > > > > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:20:36 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AFC3D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:20:36 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBKcFc029244; Thu, 28 Jul 2011 06:20:38 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id E7DE7FF00B; Thu, 28 Jul 2011 06:20:37 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 2CAE7FF003; Thu, 28 Jul 2011 06:20:16 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04091 for mathgroup-newout; Thu, 28 Jul 2011 07:54:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04085 for mathgroup-newsend; Thu, 28 Jul 2011 07:54:53 -0400 (EDT) Date: Thu, 28 Jul 2011 07:54:53 -0400 (EDT) Message-Id: <201107281154.HAA04085 at smc.vnet.net> From: "Donald DuBois" <donabc at comcast.net> Subject: [mg120545] Re: Grid Divider Style With Background Colors Reply-To: "Donald DuBois" <donald at ieee.org> References: <201107251128.HAA25473 at smc.vnet.net> <A6EB6AB9-1A03-404B-88A7-CE43F121134C at gmail.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.110614 Heike, That was a wonderful solution. Many thanks. Don -----Original Message----- From: Heike Gramberg Sent: Monday, July 25, 2011 5:19 AM To: Don Cc: mathgroup at smc.vnet.net Subject: [mg120545] Re: Grid Divider Style With Background Colors You could do something like With[{gap = 1, elemWidth=3, h = 8, w = 7}, mat = RandomInteger[10, {h, w}]; colours = Table[Blend[{Lighter[Blue], Pink}, j/w], {i, h}, {j, w}]; Framed[Grid[ MapThread[ Framed[Pane[#1, Scaled[1]], ImageMargins -> gap, Background -> #2] &, {mat, colours}, 2], Spacings -> {0, 0}, ItemSize -> elemWidth], FrameMargins -> gap]] elemWidth is the width of the elements in the Grid and gap the distance between the lines. Heike On 25 Jul 2011, at 12:28, Don wrote: > Mathematica permits divider lines between rows and columns in a table > (grid) such > as this example from the documentation: > > Grid[Table[x, {4}, {11}], Dividers -> {{{{True, False}}, -1 -> True}, > False}] > > But, the dividers are single lines only. > > Sometimes double line dividers are desired > as shown in this table on the Web: > > http://www.assetcorrelation.com/user/correlations/90 > > Notice that the background color for an item is only within > the inside line of a double line divider. > > Is there any way to produce (a) this kind of divider (double line) > and (b) with background colors for specific items that don't cross > the inside line of the double line divider? > > Thank you in advance. > > Don > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:22:04 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 204D96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:22:04 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBM0sG029308; Thu, 28 Jul 2011 06:22:05 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 3C9CF98033; Thu, 28 Jul 2011 06:22:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 871F098004; Thu, 28 Jul 2011 06:21:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04030 for mathgroup-newout; Thu, 28 Jul 2011 07:53:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04026 for mathgroup-newsend; Thu, 28 Jul 2011 07:53:25 -0400 (EDT) Date: Thu, 28 Jul 2011 07:53:25 -0400 (EDT) Message-Id: <201107281153.HAA04026 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120537] Re: how to ListPlot3D large data sets References: <201107271014.GAA21258 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.111215 On Wed, 27 Jul 2011, Ted Sariyski wrote: > Hi, > > In one attempt MaxPlotPoints did not help, but I was not persistent > because I have to resolve other issues before I return to ListPlot3D. > One issue is that I cannot pack data. On the big data set I verify that > it is numeric array and still I cannot get it packed. Here is an example: > > mydata={{0.00100,10.,0.},{0.00100,10.,0.00100},{0.00100,10.,0.00200},{0.00100,10.,0.00300},{0.00100,10.,0.00400}}; > > MatrixQ[mydata,NumericQ] > True > > myPackedData=ToPackedArray[mydata,Real]; > > MatrixQ[myPackedData, NumericQ] > True > > PackedArrayQ[myPackedData] > False > > What I am doing wrong? > Thanks, > --Ted Ted, possibly ToPackedArray are not on you context path either try <<Developer` or mydata = {{0.00100, 10., 0.}, {0.00100, 10., 0.00100}, {0.00100, 10., 0.00200}, {0.00100, 10., 0.00300}, {0.00100, 10., 0.00400}}; myPackedData = Developer`ToPackedArray[mydata, Real]; Developer`PackedArrayQ[myPackedData] Oliver > > On 7/25/2011 7:30 AM, Oliver Ruebenkoenig wrote: >> On Sat, 23 Jul 2011, Ted Sariyski wrote: >> >>> Hi, >>> I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a data >>> set with many millions of records. I was not able to get an image from the >>> full dataset, it takes forever. If I use e.g. every fifth record, although >>> slow, I get an image. The machine running Mathematica is Windows 7 (64 bit), >>> has 24 GB RAM and there was no swapping. I wonder what is considered as a >>> reasonable data size for ListPlot3D and are there other tools in Mathematica >>> for visualization of large data sets? >>> Thanks in advance, >>> --Ted >>> >>> >>> >> Ted, >> >> is your data packed? >> >> Developer`PackedArrayQ[yourData] >> >> Oliver >> > > > From mathgroup-adm at smc.vnet.net Thu Jul 28 06:24:06 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 22A996BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:24:06 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBO7eV029510; Thu, 28 Jul 2011 06:24:07 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 3A470FF003; Thu, 28 Jul 2011 06:24:07 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 920C6A8138; Thu, 28 Jul 2011 06:24:05 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04037 for mathgroup-newout; Thu, 28 Jul 2011 07:53:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04032 for mathgroup-newsend; Thu, 28 Jul 2011 07:53:36 -0400 (EDT) Date: Thu, 28 Jul 2011 07:53:36 -0400 (EDT) Message-Id: <201107281153.HAA04032 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120538] Re: how to ListPlot3D large data sets References: <201107232354.TAA08712 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.111215 It works if you either specify ToPackedArray/PackedArrayQ by context: myPackedData = Developer`ToPackedArray[mydata,Real]; Developer`PackedArrayQ[myPackedData] True or add Developer` to $ContextPath: $ContextPath = Prepend[$ContextPath, "Developer`"] ToPackedArray[mydata,Real]; PackedArrayQ[myPackedData] True Best, (another) O. R. On Wed, 27 Jul 2011 11:21:44 +0100, Ted Sariyski <tsariysk at craft-tech.com> wrote: > Hi, > > In one attempt MaxPlotPoints did not help, but I was not persistent > because I have to resolve other issues before I return to ListPlot3D. > One issue is that I cannot pack data. On the big data set I verify that > it is numeric array and still I cannot get it packed. Here is an > example: > > mydata={{0.00100,10.,0.},{0.00100,10.,0.00100},{0.00100,10.,0.00200},{0.00100,10.,0.00300},{0.00100,10.,0.00400}}; > > MatrixQ[mydata,NumericQ] > True > > myPackedData=ToPackedArray[mydata,Real]; > > MatrixQ[myPackedData, NumericQ] > True > > PackedArrayQ[myPackedData] > False > > What I am doing wrong? > Thanks, > --Ted > > On 7/25/2011 7:30 AM, Oliver Ruebenkoenig wrote: >> On Sat, 23 Jul 2011, Ted Sariyski wrote: >>> Hi, >>> I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a >>> data >>> set with many millions of records. I was not able to get an image from >>> the >>> full dataset, it takes forever. If I use e.g. every fifth record, >>> although >>> slow, I get an image. The machine running Mathematica is Windows 7 (64 >>> bit), >>> has 24 GB RAM and there was no swapping. I wonder what is considered >>> as a >>> reasonable data size for ListPlot3D and are there other tools in >>> Mathematica >>> for visualization of large data sets? >>> Thanks in advance, >>> --Ted >>> >> Ted, >> >> is your data packed? >> >> Developer`PackedArrayQ[yourData] >> >> Oliver From mathgroup-adm at smc.vnet.net Thu Jul 28 06:26:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D71E36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:26:21 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBQNMM030282; Thu, 28 Jul 2011 06:26:23 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id D2ED7A816B; Thu, 28 Jul 2011 06:26:22 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id ACB6AFF006; Thu, 28 Jul 2011 06:26:00 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04072 for mathgroup-newout; Thu, 28 Jul 2011 07:54:32 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04067 for mathgroup-newsend; Thu, 28 Jul 2011 07:54:31 -0400 (EDT) Date: Thu, 28 Jul 2011 07:54:31 -0400 (EDT) Message-Id: <201107281154.HAA04067 at smc.vnet.net> From: Emu <samuel.thomas.blake at gmail.com> Subject: [mg120543] Re: Roots of a Jacobi polynomial References: <j0ool2$kr9$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.111215 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P5 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_7 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 27, 8:18 pm, Bob Hanlon <hanl... at cox.net> wrote: > Don't use machine precision > > eqn1 = JacobiP[25, -1/2, -1/2, x] == 0; > > soln1 = NSolve[eqn1, x, WorkingPrecision -> 15]; > > Length[soln1] > > 25 > > And @@ (eqn1 /. soln1) > > True > > And @@ (-1 < # < 1 & /@ (x /. soln1)) > > True > > eqn2 = JacobiP[25, -0.5`20, -0.5`20, x] == 0; > > soln2 = NSolve[eqn2, x, WorkingPrecision -> 15]; > > soln1 == soln2 > > True > > Bob Hanlon > > ---- Jacopo Bertolotti <J.Bertolo... at utwente.nl> wrote: > > ============= > Dear MathGroup, > Mathematica implements Jacobi polynomials as JacobiP[n,a,b,x] where n is > the order of the polynomial. As it can be checked plotting it a Jacobi > polynomial has n real roots in the interval [-1,1] and it goes rapidly > to infinity outside this interval (at least when both a and b are >-1). > The problem arise when you try to find the roots of such a polynomial > for a relatively high value of n. As an example the command > NSolve[JacobiP[20, -0.5, -0.5, x] == 0, x] correctly returns > > {{x -> -0.99702}, {x -> -0.972111}, {x -> -0.92418}, {x -> -0.852398}, > {x -> -0.760555}, {x -> -0.649375}, {x -> -0.522529}, {x -> -0.382672}, > {x -> -0.233449}, {x -> -0.0784582}, {x -> 0.0784591}, {x -> 0.233445}, > {x -> 0.382684}, {x -> 0.522504}, {x -> 0.649423}, {x -> 0.760466}, {x > -> 0.852539}, {x -> 0.924002}, {x -> 0.972267}, {x -> 0.996958}} > > while NSolve[JacobiP[25, -0.5, -0.5, x] == 0, x] gives > > {{x -> -1.01869}, {x -> -0.979859 - 0.0479527 I}, {x -> -0.979859 + > 0.0479527 I}, {x -> -0.870962 - 0.070991 I}, {x -> -0.870962 + 0.070991 > I}, {x -> -0.71378 - 0.0505783 I}, {x -> -0.71378 + 0.0505783 I}, {x -> > -0.571283}, {x -> -0.486396}, {x -> -0.367829}, {x -> -0.248377}, {x -> > -0.125513}, {x -> -0.0000434329}, {x -> 0.125442}, {x -> 0.2489}, {x -> > 0.365644}, {x -> 0.496977}, {x -> 0.555743}, {x -> 0.717741- 0.0573399 > I}, {x -> 0.717741+ 0.0573399 I}, {x -> 0.87423- 0.0652273 I}, {x -> > 0.87423+ 0.0652273 I}, {x -> 0.977876- 0.0422422 I}, {x -> 0.977876+ > 0.0422422 I}, {x -> 1.01494}} > > i.e. both complex roots and roots outside the [-1,1] interval. > Substituting any of these values back into the polynomial easily show > that these values are not roots at all. Also notice that using the > command Root (e.g. Sort@Table[Root[JacobiP[25, -0.5, -0.5, x], i], {i, > 1, 25}]) gives different but still wrong results. > On a related note: NIntegrate sometimes gives wrong results when > integrating function of the form (1-x)^a (1+x)^b f[x] and I feel this > might related to the Gauss-Jacobi quadrature failing to retrieve the > correct roots of a Jacobi polynomial. > > Do anyone have a solution for that? > > Thank you > > Jacopo Here's one way to get them in Alpha. http://www.wolframalpha.com/input/?i=numerical+solutions+to+JacobiP%5B25%2C+-1%2F2%2C+-1%2F2%2C+x%5D+%3D%3D+0 Sam From mathgroup-adm at smc.vnet.net Thu Jul 28 06:28:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1F2206BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:28:16 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBSHLE030478; Thu, 28 Jul 2011 06:28:17 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 0FC6FFF004; Thu, 28 Jul 2011 06:28:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 88BFDA816B; Thu, 28 Jul 2011 06:28:15 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04045 for mathgroup-newout; Thu, 28 Jul 2011 07:53:47 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04041 for mathgroup-newsend; Thu, 28 Jul 2011 07:53:47 -0400 (EDT) Date: Thu, 28 Jul 2011 07:53:47 -0400 (EDT) Message-Id: <201107281153.HAA04041 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120539] Re: FinancialData still broken Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.111514 > Would it be easier to just get the data from Yahoo rather than have to > worry about fixes and innoculations? I don't know how to do that, but I suspect it's Yahoo sending erroneous prices, anyway. Bobby On Wed, 27 Jul 2011 05:12:30 -0500, Armand Tamzarian <mike.honeychurch at gmail.com> wrote: > On Jul 24, 10:26 am, DrMajorBob <btre... at austin.rr.com> wrote: >> I usually don't see the "price > 10^8" bug, either. It may have been >> permanently gone by the time you looked for it. But it was there for a >> day >> or so. >> >> I know the occasional spurious Missing coming back is a months-old issue >> at least, and Dan Delouis confirmed it still exists. >> >> I've inoculated my code against both bugs, so I may not notice when they >> go away. >> >> Bobby > > > > Would it be easier to just get the data from Yahoo rather than have to > worry about fixes and innoculations? > > > >> >> On Sat, 23 Jul 2011 01:29:09 -0500, James Stein <mathgr... at stein.org> >> wrote: >> >> >> >> >> >> >> >> >> >> >> >> > DANA DELOUIS wrote: >> > I really hope they fix this soon, but I guess they never issue bug >> fixes. >> >> > Are these bugs in Mathematica, or bugs in Yahoo? >> > FWIW, I do not see the bug reported by the OP (DrMajorBob). >> >> > On Fri, Jul 22, 2011 at 4:44 PM, DANA DELOUIS <dana.... at gmail.com> >> wrote: >> >> >> ...> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8... >> >> >> Hi. This function has lots of problems. >> >> In addition to the problems you point out, here's a slightly >> different >> >> view. >> >> Sometimes the Price, and Latest Price match. >> >> Other times, the Price is corrupt, but the latest price is correct, >> and >> >> sometimes it's the other way around. >> >> Sometimes the CIK codes or Exchange are missing, etc. >> >> Other issues are bugs in Option pricing, etc. >> >> I really hope they fix this soon, but I guess they never issue bug >> >> fixes. >> >> >> >> stocks={"ACEIX","FCNTX","JACNX","JANFX","JANWX","JMSCX","JNGIX","JNGLX", >> >> "JNMCX=94, >> >> "JNOSX","JNSGX","JNSTX","PTTAX","RGACX","STRFX=94}; >> >> >> Transpose[ >> >> { >> >> Map[FinancialData[#,"Price"]&,stocks], >> >> Map[FinancialData[#,"LatestTrade"]&,stocks], >> >> Map[FinancialData[#,"CIK"]&,stocks], >> >> Map[FinancialData[#,"Company"]&,stocks] >> >> }][[;;6]] >> >> >> < Just the first 6 for posting >> >> < Looks better in MatrixForm, or something similar...> >> >> >> {5.0324*10^8,{Missing[NotAvailable],5.0324*10^8},0000080832,Van >> Kampen >> >> Equity Income Fund A} >> >> {5.0311*10^8,{{2011,7,20,17,11,0.},72.17},0000024238,Fidelity Contra >> >> Fund} >> >> {13.97,{{2011,7,20,17,50,0.},13.97},0000277751,Janus Contrarian Fund >> D >> >> Shares} >> >> {5.0324*10^8,{{2001,12,22,20,42,0.},5.0324*10^8},0000277751,Janus >> >> Flexible >> >> Bond Fund D Shar} >> >> {5.0324*10^8,{{2011,7,20,18,24,0.},46.74},0000277751,Janus Worldwide >> >> Fund D >> >> Shares} >> >> {12.48,{{2011,7,20,17,51,0.},12.48},Missing[NotAvailable],Janus Smart >> >> Portfolio Conservat} >> >> >> = = = = = = = = = = >> >> Dana DeLouis >> >> $Version >> >> 8.0 for Mac OS X x86 (64-bit) (November 6, 2010) >> >> >> On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: >> >> > Erroneous prices are randomly returned: >> >> >> > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", >> >> > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", >> >> > "PTTAX", "RGACX", "STRFX"} >> >> >> > {8.81, 72.4, 14., 10.64, 46.49, 12.48, >> >> > 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, >> >> > 5.03241*10^8, 11.04, 31.44, 32.47} >> >> >> > FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", >> >> > "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", >> >> > "PTTAX", "RGACX", "STRFX"} >> >> >> > {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, >> >> > 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, >> >> > 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} >> >> >> > Bobby >> >> >> > -- >> >> > DrMajor... at yahoo.com >> >> -- >> DrMajor... at yahoo.com > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Thu Jul 28 06:29:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 609656BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Thu, 28 Jul 2011 06:29:48 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6SBTnsE030569; Thu, 28 Jul 2011 06:29:49 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 6ADDFFF009; Thu, 28 Jul 2011 06:29:49 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id BDC45A8195; Thu, 28 Jul 2011 06:29:47 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04082 for mathgroup-newout; Thu, 28 Jul 2011 07:54:43 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA04077 for mathgroup-newsend; Thu, 28 Jul 2011 07:54:42 -0400 (EDT) Date: Thu, 28 Jul 2011 07:54:42 -0400 (EDT) Message-Id: <201107281154.HAA04077 at smc.vnet.net> From: Jacopo Bertolotti <J.Bertolotti at utwente.nl> Subject: [mg120544] Re: Roots of a Jacobi polynomial References: <201107261107.HAA09296 at smc.vnet.net> <4E2EFAAD.60403 at wolfram.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.28.111514 On 07/26/2011 07:34 PM, Daniel Lichtblau wrote: > On 07/26/2011 06:07 AM, Jacopo Bertolotti wrote: >> Dear MathGroup, >> Mathematica implements Jacobi polynomials as JacobiP[n,a,b,x] where n is >> the order of the polynomial. As it can be checked plotting it a Jacobi >> polynomial has n real roots in the interval [-1,1] and it goes rapidly >> to infinity outside this interval (at least when both a and b are>-1). >> The problem arise when you try to find the roots of such a polynomial >> for a relatively high value of n. As an example the command >> NSolve[JacobiP[20, -0.5, -0.5, x] == 0, x] correctly returns >> >> {{x -> -0.99702}, {x -> -0.972111}, {x -> -0.92418}, {x -> >> -0.852398}, >> {x -> -0.760555}, {x -> -0.649375}, {x -> -0.522529}, {x -> >> -0.382672}, >> {x -> -0.233449}, {x -> -0.0784582}, {x -> 0.0784591}, {x -> >> 0.233445}, >> {x -> 0.382684}, {x -> 0.522504}, {x -> 0.649423}, {x -> >> 0.760466}, {x >> -> 0.852539}, {x -> 0.924002}, {x -> 0.972267}, {x -> 0.996958}} >> >> while NSolve[JacobiP[25, -0.5, -0.5, x] == 0, x] gives >> >> {{x -> -1.01869}, {x -> -0.979859 - 0.0479527 I}, {x -> -0.979859 + >> 0.0479527 I}, {x -> -0.870962 - 0.070991 I}, {x -> -0.870962 + >> 0.070991 >> I}, {x -> -0.71378 - 0.0505783 I}, {x -> -0.71378 + 0.0505783 I}, >> {x -> >> -0.571283}, {x -> -0.486396}, {x -> -0.367829}, {x -> -0.248377}, >> {x -> >> -0.125513}, {x -> -0.0000434329}, {x -> 0.125442}, {x -> 0.2489}, >> {x -> >> 0.365644}, {x -> 0.496977}, {x -> 0.555743}, {x -> 0.717741- >> 0.0573399 >> I}, {x -> 0.717741+ 0.0573399 I}, {x -> 0.87423- 0.0652273 I}, {x -> >> 0.87423+ 0.0652273 I}, {x -> 0.977876- 0.0422422 I}, {x -> 0.977876+ >> 0.0422422 I}, {x -> 1.01494}} >> >> i.e. both complex roots and roots outside the [-1,1] interval. >> Substituting any of these values back into the polynomial easily show >> that these values are not roots at all. Also notice that using the >> command Root (e.g. Sort@Table[Root[JacobiP[25, -0.5, -0.5, x], i], {i, >> 1, 25}]) gives different but still wrong results. >> On a related note: NIntegrate sometimes gives wrong results when >> integrating function of the form (1-x)^a (1+x)^b f[x] and I feel this >> might related to the Gauss-Jacobi quadrature failing to retrieve the >> correct roots of a Jacobi polynomial. >> >> Do anyone have a solution for that? >> >> Thank you >> >> Jacopo > > This is not a well conditioned problem. To do better you'll need to > allow NSolve to use higher precision by not giving machine numbers in > the input. > > In[102]:= solns = Sort[NSolve[JacobiP[25, -1/2, -1/2, x] == 0, x]] > > Out[102]= {{x -> -0.998027}, {x -> -0.982287}, {x -> -0.951057}, {x \ > -> -0.904827}, {x -> -0.844328}, {x -> -0.770513}, {x -> -0.684547}, \ > {x -> -0.587785}, {x -> -0.481754}, {x -> -0.368125}, {x -> \ > -0.24869}, {x -> -0.125333}, {x -> 0.}, {x -> 0.125333}, {x -> > 0.24869}, {x -> 0.368125}, {x -> 0.481754}, {x -> 0.587785}, {x -> > 0.684547}, {x -> 0.770513}, {x -> 0.844328}, {x -> 0.904827}, {x -> > 0.951057}, {x -> 0.982287}, {x -> 0.998027}} > > These might seem imperfect when you check residuals (see below). In > fact they are not at all bad. We first show that by comparing to > higher precision versions that do validate fairly well as giving > smallish residuals. > > In[104]:= solns30 = > Sort[NSolve[JacobiP[25, -1/2, -1/2, x] == 0, x, > WorkingPrecision -> 30]] > > Out[104]= {{x -> -0.998026728428271561952336806863}, {x -> \ > -0.982287250728688681085641742865}, {x -> \ > -0.951056516295153572116439333379}, {x -> \ > -0.904827052466019527713668647933}, {x -> \ > -0.844327925502015078548558063967}, {x -> \ > -0.770513242775789230803009636396}, {x -> \ > -0.684547105928688673732283357621}, {x -> \ > -0.587785252292473129168705954639}, {x -> \ > -0.481753674101715274987191502872}, {x -> \ > -0.368124552684677959156947147493}, {x -> \ > -0.248689887164854788242283746006}, {x -> \ > -0.125333233564304245373118759817}, {x -> 0}, {x -> > 0.125333233564304245373118759817}, {x -> > 0.248689887164854788242283746006}, {x -> > 0.368124552684677959156947147493}, {x -> > 0.481753674101715274987191502872}, {x -> > 0.587785252292473129168705954639}, {x -> > 0.684547105928688673732283357621}, {x -> > 0.770513242775789230803009636396}, {x -> > 0.844327925502015078548558063967}, {x -> > 0.904827052466019527713668647933}, {x -> > 0.951056516295153572116439333379}, {x -> > 0.982287250728688681085641742865}, {x -> > 0.998026728428271561952336806863}} > > This shows the two results are quite close. > > In[106]:= Max[Abs[(x /. solns) - (x /. solns30)]] > Out[106]= 4.47615*10^-10 > > This shows the high precision solutions give reasonable residuals. > > In[108]:= Max[Abs[JacobiP[25, -1/2, -1/2, x] /. solns30]] > Out[108]= 0.*10^-12 > > The machine precision results will not give good residuals. There are > two possible (and related) reasons. One is that the conditioning is > such that we are bound to lose many digits in assessing residuals (as > seems to happen above). The other is that the form of JacobiP > polynomials might just be inducing cancellation error. > > Certainly this second item is part of the problem: > > In[109]:= Max[Abs[Expand[JacobiP[25, -1/2, -1/2, x]] /. solns30]] > Out[109]= 0.*10^-21 > > Here are the corresponding machine precision evaluations of residuals. > > In[112]:= Max[Abs[JacobiP[25, -1/2, -1/2, x] /. solns]] > Out[112]= 17. > > In[113]:= Max[Abs[Expand[JacobiP[25, -1/2, -1/2, x]] /. solns]] > Out[113]= 9.31323*10^-9 > > Daniel Lichtblau > Wolfram Research > Thank you Daniel. And thank you also to everyone who wrote me suggestions (both here and in private). The combination of not using machine number in the input and increasing the WorkingPrecision seems to work fine. Apparently just using one of the two tricks do not yield any sensible result. Jacopo From mathgroup-adm at smc.vnet.net Fri Jul 29 02:47:31 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4A1026BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:47:31 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7lVPH003276; Fri, 29 Jul 2011 02:47:31 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id BA27BA80BA; Fri, 29 Jul 2011 02:47:31 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 024F6BF482; Fri, 29 Jul 2011 02:47:30 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13345 for mathgroup-newout; Fri, 29 Jul 2011 04:41:22 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13339 for mathgroup-newsend; Fri, 29 Jul 2011 04:41:21 -0400 (EDT) Date: Fri, 29 Jul 2011 04:41:21 -0400 (EDT) Message-Id: <201107290841.EAA13339 at smc.vnet.net> From: Sam McDermott <samwell187 at gmail.com> Subject: [mg120556] hatched regions, shading, and fills To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.73914 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_400_499 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hi, After looking over some old threads, it looks like there is no elegant way to add hatch marked regions in the interior of a graphic. This is regrettable, because it would really simplify things for my particular task right now. However, are there other easily accessed directives that might give a similar result? For instance, filling in a region with polka dots? Adding diagonal lines? Filling with a very simple texture? Any help is much appreciated, Thanks, Sam From mathgroup-adm at smc.vnet.net Fri Jul 29 02:48:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7FFBD6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:48:26 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7mRVY003355; Fri, 29 Jul 2011 02:48:27 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id B2A6EA8170; Fri, 29 Jul 2011 02:48:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D3AA0BF480; Fri, 29 Jul 2011 02:48:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13323 for mathgroup-newout; Fri, 29 Jul 2011 04:41:00 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13318 for mathgroup-newsend; Fri, 29 Jul 2011 04:40:59 -0400 (EDT) Date: Fri, 29 Jul 2011 04:40:59 -0400 (EDT) Message-Id: <201107290840.EAA13318 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120554] Re: Timing progress bar References: <201107281155.HAA04128 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.73914 On Thu, 28 Jul 2011, Berthold Hamburger wrote: > Hi, > > Is there any possibility to get visible feedback about the progress of a > calculation via the Timing function? Something like a progress bar or "% > completed". > > Thanks > > Berthold > > Berthold, here are two examples with NDSolve: tEnd = 100; ProgressIndicator[Dynamic[currentTime], {0, tEnd}] currentTime = 0; NDSolve[{D[u[t, x], t] == D[u[t, x], x, x], u[0, x] == 0, u[t, 0] == Sin[t], u[t, 5] == 0}, u, {t, 0, tEnd}, {x, 0, 5}, EvaluationMonitor :> (currentTime = t;)] showStatus[status_] := LinkWrite[$ParentLink, SetNotebookStatusLine[FrontEnd`EvaluationNotebook[], ToString[status]]]; clearStatus[] := showStatus[""]; clearStatus[] (* look in the lower left of the FrontEnd *) NDSolve[{D[u[t, x], t] == D[u[t, x], x, x], u[0, x] == 0, u[t, 0] == Sin[t], u[t, 5] == 0}, u, {t, 0, 10}, {x, 0, 5}, EvaluationMonitor :> showStatus["t = " <> ToString[CForm[t]]]] Oliver From mathgroup-adm at smc.vnet.net Fri Jul 29 02:48:27 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id CB5566BB19 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:48:26 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7mRNv003357; Fri, 29 Jul 2011 02:48:27 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id BE645BF480; Fri, 29 Jul 2011 02:48:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id AEB32A80BA; Fri, 29 Jul 2011 02:48:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13417 for mathgroup-newout; Fri, 29 Jul 2011 04:43:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13412 for mathgroup-newsend; Fri, 29 Jul 2011 04:43:01 -0400 (EDT) Date: Fri, 29 Jul 2011 04:43:01 -0400 (EDT) Message-Id: <201107290843.EAA13412 at smc.vnet.net> From: Helen Read <readhpr at gmail.com> Subject: [mg120565] Re: Timing progress bar References: <j0rj1i$43r$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.73914 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_300_399 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On 7/28/2011 8:00 AM, Berthold Hamburger wrote: > Hi, > > Is there any possibility to get visible feedback about the progress of a > calculation via the Timing function? Something like a progress bar or "% > completed". > > Thanks > > Berthold > Have you tried using ProgressIndicator? -- Helen Read University of Vermont From mathgroup-adm at smc.vnet.net Fri Jul 29 02:50:15 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 47BA36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:50:15 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7oGVS003531; Fri, 29 Jul 2011 02:50:16 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 08767A8195; Fri, 29 Jul 2011 02:50:16 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 4F836A816B; Fri, 29 Jul 2011 02:50:14 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13426 for mathgroup-newout; Fri, 29 Jul 2011 04:43:14 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13421 for mathgroup-newsend; Fri, 29 Jul 2011 04:43:13 -0400 (EDT) Date: Fri, 29 Jul 2011 04:43:13 -0400 (EDT) Message-Id: <201107290843.EAA13421 at smc.vnet.net> From: "Christoph Lhotka" <christoph.lhotka at univie.ac.at> Subject: [mg120566] Re: Timing progress bar To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.73914 hy, i like to use it a lot: Dynamic[ProgressIndicator[i]] where i is a variables between 0 and 1. If you write somewhere in your notebook the above expression and update i in your peace of code accordingly you will have a feeling about the status of the evaluation. christoph On 28/07/2011 13:55, Berthold Hamburger wrote: > Hi, > > Is there any possibility to get visible feedback about the progress of a > calculation via the Timing function? Something like a progress bar or "% > completed". > > Thanks > > Berthold > From mathgroup-adm at smc.vnet.net Fri Jul 29 02:52:18 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7C0BB6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:52:18 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7qJag003692; Fri, 29 Jul 2011 02:52:19 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 7776DBF47C; Fri, 29 Jul 2011 02:52:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 97388A8170; Fri, 29 Jul 2011 02:52:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13393 for mathgroup-newout; Fri, 29 Jul 2011 04:42:28 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13386 for mathgroup-newsend; Fri, 29 Jul 2011 04:42:27 -0400 (EDT) Date: Fri, 29 Jul 2011 04:42:27 -0400 (EDT) Message-Id: <201107290842.EAA13386 at smc.vnet.net> From: barry brunson <mathisfun at mac.com> Subject: [mg120562] CompressedData in Buttons To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.74516 Sorry if this is really obvious. I have some Buttons that display various data, e.g., area, population, density, etc. of U.S. states, and would like to update the data. I have only the buttons, not the Input code that produced them long ago. Using Show Expression on the button reveals that, instead of being in List form, much of the data appears as "CompressedData[ ... (gibberish) ...]. How can I recover the original, uncompressed, data so that I can revise it? I found nothing in the Documentation Center or Virtual Book, and none of the 74 hits on wolfram.com appear to shed any relevant light. Thanks. From mathgroup-adm at smc.vnet.net Fri Jul 29 02:54:05 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id DFB976BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:54:04 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7s5NB003893; Fri, 29 Jul 2011 02:54:05 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id D720CBF47F; Fri, 29 Jul 2011 02:54:05 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 23BC9A80BA; Fri, 29 Jul 2011 02:54:04 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13368 for mathgroup-newout; Fri, 29 Jul 2011 04:41:55 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13363 for mathgroup-newsend; Fri, 29 Jul 2011 04:41:54 -0400 (EDT) Date: Fri, 29 Jul 2011 04:41:54 -0400 (EDT) Message-Id: <201107290841.EAA13363 at smc.vnet.net> From: "Chris Degnen" <degnen at cwgsy.net> Subject: [mg120559] Re: FinancialData still broken To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.74516 DrMajorBob wrote: > Armand Tamzarian wrote: >> >> Would it be easier to just get the data from Yahoo rather than have to >> worry about fixes and innoculations? > > I don't know how to do that, but I suspect it's Yahoo sending erroneous > prices, anyway. You can get quotes from Yahoo like this: quotes = Import[ "http://download.finance.yahoo.com/d/quote.csv?s=\ CLU11.NYM+^GSPC+^FTSE&f=abdlohg"]; (*www.mathematicacookbook.com/downloads/YahooDataDownload.htm*) TableForm[ Map[List, MapThread[StringJoin, {{"WTI - ", "S&P - ", "FTSE - "}, StringReplace[quotes[[All, 4]], {"<b>" -> "", "</b>" -> ""}]}]], TableHeadings -> {None, {"Last Trade"}}] From mathgroup-adm at smc.vnet.net Fri Jul 29 02:55:57 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EF7F56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:55:56 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7twxg004669; Fri, 29 Jul 2011 02:55:58 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 4AC23FF006; Fri, 29 Jul 2011 02:55:58 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A350AA80BA; Fri, 29 Jul 2011 02:55:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13382 for mathgroup-newout; Fri, 29 Jul 2011 04:42:17 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13377 for mathgroup-newsend; Fri, 29 Jul 2011 04:42:16 -0400 (EDT) Date: Fri, 29 Jul 2011 04:42:16 -0400 (EDT) Message-Id: <201107290842.EAA13377 at smc.vnet.net> From: =?ISO-8859-1?Q?Iv=E1n_Pulido_Sanchez?= <ijpulido.s at gmail.com> Subject: [mg120561] Mathematica 8 remote parallel kernels To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.74516 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_700_799 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hello, When I try to configure remote kernels in Mathematica via Evaluation>Parallel Kernel Configuration ... then I go to "Remote Kernels" and add hosts, after that I try to Launch the remote kernels and only some of them get launched (the number of them varies),and finally I get a msg like the following. KernelObject::rdead: Subkernel connected through remote[nodo2] appears dead. >> LinkConnect::linkc: Unable to connect to LinkObject[36154 at 192.168.1.104, 49648 at 192.168.1.104,38,12]. >> General::stop: Further output of LinkConnect::linkc will be suppressed during this calculation. >> Any ideas how to get this working? Take into account it sometimes does load some of the remote kernels but never all of them. Thanks in advance I hope you can help me with this. From mathgroup-adm at smc.vnet.net Fri Jul 29 02:58:02 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 74BD56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 02:58:02 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T7w3BF004796; Fri, 29 Jul 2011 02:58:03 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 504E7A81B7; Fri, 29 Jul 2011 02:58:03 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 7D35FFF009; Fri, 29 Jul 2011 02:58:01 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13443 for mathgroup-newout; Fri, 29 Jul 2011 04:43:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13439 for mathgroup-newsend; Fri, 29 Jul 2011 04:43:36 -0400 (EDT) Date: Fri, 29 Jul 2011 04:43:36 -0400 (EDT) Message-Id: <201107290843.EAA13439 at smc.vnet.net> From: "David Park" <djmpark at comcast.net> Subject: [mg120568] Evaluating WeierstrassP at large arguments To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.74814 The WeierstrassP function is doubly periodic. Do the numerical evaluation routines for this function take this into account when evaluating for large arguments, using a Mod function on the argument? If not, would there be something to be gained by the user writing a "front end" for WeierstrassP[z,{g2,g3}] moving z to the principal period parallelogram? Especially if g2 and g3 were fixed and z was scanned only along the direction of one half-period. I'm thinking of something like a high precision mod function followed by a MachinePrecision evaluation of WeierstrassP. My experience has been that calculating the half-periods from g2-g3 has a fair loss of significance but if we only had to calculate them once we could afford extra high precision. David Park djmpark at comcast.net <http://home.comcast.net/~djmpark> http://home.comcast.net/~djmpark/ From mathgroup-adm at smc.vnet.net Fri Jul 29 03:00:18 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D630B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:00:18 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T80Jnd005040; Fri, 29 Jul 2011 03:00:19 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id D82EAFF00E; Fri, 29 Jul 2011 03:00:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id DE215FF00B; Fri, 29 Jul 2011 03:00:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13411 for mathgroup-newout; Fri, 29 Jul 2011 04:42:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13406 for mathgroup-newsend; Fri, 29 Jul 2011 04:42:50 -0400 (EDT) Date: Fri, 29 Jul 2011 04:42:50 -0400 (EDT) Message-Id: <201107290842.EAA13406 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120564] FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.74814 I've found a new (to me) species of error in FinancialData. One example is the price of the following stock on Feb 10, 2011: s = "JANFX"; FinancialData["JANFX", "Name"] FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] "Janus Flexible Bond Fund D Shar" {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, 10.24}} As you see, FinancialData says the price was 10.23. But I BOUGHT the stock through Janus Funds on that day, and the price was 10.36. Moreover, if I go to Yahoo's interactive price chart for the stock at the following page, 10.36 is the price I find: http://finance.yahoo.com/echarts?s=JANFX+Interactive#chart3:symbol=janfx;range=ytd;indicator=volume;charttype=line;crosshair=on;ohlcvalues=0;logscale=on;source=undefined So... where are the errors really coming from? This is not an astronomically large price or a Missing["Not Available"] price; it's within 2% of the correct price. But it's wrong. These errors make it very difficult to trust FinancialData for any useful purpose. Bobby -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Fri Jul 29 03:02:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EEFCC6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:02:20 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T82MjD005299; Fri, 29 Jul 2011 03:02:22 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id DDFA5FF008; Fri, 29 Jul 2011 03:02:21 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id C514CFF007; Fri, 29 Jul 2011 03:02:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13359 for mathgroup-newout; Fri, 29 Jul 2011 04:41:44 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13354 for mathgroup-newsend; Fri, 29 Jul 2011 04:41:43 -0400 (EDT) Date: Fri, 29 Jul 2011 04:41:43 -0400 (EDT) Message-Id: <201107290841.EAA13354 at smc.vnet.net> From: Leonid Shifrin <lshifr at gmail.com> Subject: [mg120558] Re: Why FullDefinition does not work in MathLink mode? References: <201107281155.HAA04113 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.75414 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1400_1499 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. >From the documentation of Definition, in Possible Issues section: Definition is an output form; it does not evaluate: In[1]:= Definition[Plus] Out[1]= Attributes[Plus]={Flat,Listable,NumericFunction,OneIdentity,Orderless,Protected} Default[Plus]:=0 In[2]:= FullForm[%] Out[2]//FullForm= Definition[Plus] Regards, Leonid On Thu, Jul 28, 2011 at 3:55 PM, Alexey Popkov <lehin.p at gmail.com> wrote: > Hello, > > When working with MathKernel in interactive session without of the > FrontEnd, FullDefinition works as expected: > > In[1]:= a=2;FullDefinition[a] > > Out[1]= a = 2 > > But when trying to use it in MathLink mode one get ReturnPacket with > unevaluated FullDefinition: > > In[1]:= kernel=LinkLaunch[First[$CommandLine] <> " -mathlink"]; > LinkRead[kernel]; > LinkWrite[kernel,Unevaluated[a=2;FullDefinition[a]]] > LinkRead[kernel]//FullForm > > Out[4]//FullForm= ReturnPacket[FullDefinition[a]] > > The built-in parallelization functions have the same problem: > > In[2]:= ParallelEvaluate[a=2;FullDefinition[a]]//FullForm > Out[2]//FullForm= List[FullDefinition[a],FullDefinition[a]] > > One workaround is to use ToString: > > In[3]:= ParallelEvaluate[a=2;ToString[FullDefinition[a]]] > Out[3]= {a = 2,a = 2} > > Why FullDefinition returns unevaluated in MathLink session although it > works as expected in interactive MathKernel session? Is it possible to > make it working without any glitches? > > Any ideas? > > From mathgroup-adm at smc.vnet.net Fri Jul 29 03:04:31 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9C1036BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:04:31 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T84WDa005580; Fri, 29 Jul 2011 03:04:32 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id A2434A816B; Fri, 29 Jul 2011 03:04:32 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 99EE9A80BA; Fri, 29 Jul 2011 03:04:29 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13403 for mathgroup-newout; Fri, 29 Jul 2011 04:42:40 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13398 for mathgroup-newsend; Fri, 29 Jul 2011 04:42:39 -0400 (EDT) Date: Fri, 29 Jul 2011 04:42:39 -0400 (EDT) Message-Id: <201107290842.EAA13398 at smc.vnet.net> From: "Berthold Hamburger" <b-hamburger at artinso.com> Subject: [mg120563] Re: Timing progress bar References: <201107281155.HAA04128 at smc.vnet.net> <Pine.LNX.4.63.1107280631410.23644 at wopr.wolfram.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.75414 Thanks Oliver! I also found the progress.m package: http://www.physics.ohio-state.edu/~jeremy/mathematica/progress/ Is this compatible with Mathematica 8? Regards Berthold -- Berthold Hamburger - Cellist/Spain http://www.artinso.com | http://www.astronomy.artinso.com | http://www.artemis.artinso.com http://www.facebook.com/berthold.hamburger -----Original Message----- From: Oliver Ruebenkoenig [mailto:ruebenko at wolfram.com] Sent: jueves, 28 de julio de 2011 13:34 To: Berthold Hamburger Cc: mathgroup at smc.vnet.net Subject: [mg120563] Re: Timing progress bar On Thu, 28 Jul 2011, Berthold Hamburger wrote: > Hi, > > Is there any possibility to get visible feedback about the progress of > a calculation via the Timing function? Something like a progress bar > or "% completed". > > Thanks > > Berthold > > Berthold, here are two examples with NDSolve: tEnd = 100; ProgressIndicator[Dynamic[currentTime], {0, tEnd}] currentTime = 0; NDSolve[{D[u[t, x], t] == D[u[t, x], x, x], u[0, x] == 0, u[t, 0] == Sin[t], u[t, 5] == 0}, u, {t, 0, tEnd}, {x, 0, 5}, EvaluationMonitor :> (currentTime = t;)] showStatus[status_] := LinkWrite[$ParentLink, SetNotebookStatusLine[FrontEnd`EvaluationNotebook[], ToString[status]]]; clearStatus[] := showStatus[""]; clearStatus[] (* look in the lower left of the FrontEnd *) NDSolve[{D[u[t, x], t] == D[u[t, x], x, x], u[0, x] == 0, u[t, 0] == Sin[t], u[t, 5] == 0}, u, {t, 0, 10}, {x, 0, 5}, EvaluationMonitor :> showStatus["t = " <> ToString[CForm[t]]]] Oliver From mathgroup-adm at smc.vnet.net Fri Jul 29 03:06:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 5F6706BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:06:26 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T86QMt005789; Fri, 29 Jul 2011 03:06:27 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 65B58BF42E; Fri, 29 Jul 2011 03:06:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 1CDF0BF47F; Fri, 29 Jul 2011 03:06:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13436 for mathgroup-newout; Fri, 29 Jul 2011 04:43:25 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13431 for mathgroup-newsend; Fri, 29 Jul 2011 04:43:24 -0400 (EDT) Date: Fri, 29 Jul 2011 04:43:24 -0400 (EDT) Message-Id: <201107290843.EAA13431 at smc.vnet.net> From: Joseph Gwinn <joegwinn at comcast.net> Subject: [mg120567] Re: getting ride of 0.i References: <j0oomv$krj$1 at smc.vnet.net> <j0rips$41r$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.75414 In article <j0rips$41r$1 at smc.vnet.net>, Armand Tamzarian <mike.honeychurch at gmail.com> wrote: > On Jul 27, 8:19 pm, Eli Fenichel <Eli.Fenic... at asu.edu> wrote: > > I am trying to use FindMinimum to minimize the square of a function over > many variables (i.e., parameters). The function itself has the potential > to generate imaginary numbers and involves numerical integration (the > parameter values that minimize the function are real). For clarification > the function in evaluated at multiple points so it can be written as vector. > By squaring the vector the numerical values of the elements are always real > with no imaginary parts. However, Mathematica often writes x + 0.i, where x > is a some numerical value, for some of the elements. > > > > Typically, this can be ignored, the Chop command can be used, or it simply > > does not cause problems. However, I keep getting an error: > > [cid:image003.... at 01CC4BBC.E87A0F30] > > > > NIntegrate::nlim: "t = Y[1.] is not a valid limit of integration." > > > > Y is an array with the parameters to be minimized. > > > > However, if evaluate the objective function to be minimized using > > replacement rules I get > > x + 0.i. > > > > Is there a way for me tell Mathematica to always treat 0.i as 0 and drop > > it? It seems to be causing problems in the FindMinimum call. > > > > Thanks, > > Eli > > Re[3 + 2 I] It sounds like the "0 I" is in fact a roundoff error times I, such as 10^-18 I. This problem is what Chop[] used for. Chop[x+0 I] will yield x, if roundoff error is in fact the problem. One can tell Chop[] what threshold to use. Joe Gwinn From mathgroup-adm at smc.vnet.net Fri Jul 29 03:08:04 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 037756BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:08:04 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T885fo005973; Fri, 29 Jul 2011 03:08:05 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 09F7EA815B; Fri, 29 Jul 2011 03:08:05 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 1D47BA80BA; Fri, 29 Jul 2011 03:08:03 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13373 for mathgroup-newout; Fri, 29 Jul 2011 04:42:06 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13369 for mathgroup-newsend; Fri, 29 Jul 2011 04:42:05 -0400 (EDT) Date: Fri, 29 Jul 2011 04:42:05 -0400 (EDT) Message-Id: <201107290842.EAA13369 at smc.vnet.net> From: Sebastian Hofer <sebhofer at gmail.com> Subject: [mg120560] Indeterminate result (numerical problem) Reply-To: comp.soft-sys.math.mathematica at googlegroups.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.75714 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1800_1899 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __C230066_P5 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I have a large symbolic expression which is a sum of a large number of fractions, which is the result of an integral. I can get numerical values by NIntegrate, but eventually the expression should go into a minimization problem, which would be much faster starting from an analytic expression. My troubles start even earlier though. When I try to evaluate the expression by N[expr/.parameters] I get Indeterminate. This is true independently of the precision given to N(machine or arbitrary precision) or the chosen parameters, which I initially chose to be rational numbers from an interval of about 1/10 to 10. Simplifying the symbolic expression is not possible due to its sheer size. Simplifying the separate terms and evaluating them gives me a result, but only if I set $MinPrecision=$MaxPrecision as in In[466]:= Block[{prec=MachinePrecision,$MaxPrecision,$MinPrecision},$MaxPrecision=$MinPrecision=prec;N[slist,prec]//Total] Out[466]= -0.0000554539 + 0.000957437 I where slist contains the simplified and evaluated terms. If I work with arbitrary precision instead I get In[462]:= Block[{prec=16,$MaxPrecision,$MinPrecision},$MaxPrecision=$MinPrecision=prec;N[slist,prec]//Total] Out[462]= -0.00001695456281093148 + 0.0009204297860912486 I The latter result coincides with what I obtain from NIntegrate, which I guess is correct. (Is this a valid assumption?) However, for different values of prec I get very strange results: prec=17,18,21: same as prec=16 prec=19: -0.001922263621488465141 - 0.003379886739497078367 I prec: Indeterminate prec=22: -0.0006868461930781501884710 - 0.0006068980872473164707112 I ... What is the best way to approach this problem? How do I know which results I can trust? Is there a better approach to start with? All tips are highly welcome! Sebastian From mathgroup-adm at smc.vnet.net Fri Jul 29 03:10:07 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 10BFD6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:10:07 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T8A7xc006119; Fri, 29 Jul 2011 03:10:07 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id DE5D7A8195; Fri, 29 Jul 2011 03:10:07 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id B1727A8170; Fri, 29 Jul 2011 03:10:04 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13317 for mathgroup-newout; Fri, 29 Jul 2011 04:40:49 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13312 for mathgroup-newsend; Fri, 29 Jul 2011 04:40:48 -0400 (EDT) Date: Fri, 29 Jul 2011 04:40:48 -0400 (EDT) Message-Id: <201107290840.EAA13312 at smc.vnet.net> From: "Kristof Lebecki" <Kristof.Lebecki at uni-konstanz.de> Subject: [mg120553] Re: NonlinearModelFit vector valued functions To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.75714 Hi everybody, One year ago following post was placed in this forum (Date: Thu, 4 Feb 2010 06:26:24 -0500 (EST); From: janos). It describes shortly and exactly my problem. Maybe in the last year somebody has found a nice solution? > NonlinearModelFit is able to fit to a scalar valued function, > including complex valued functions. > However, I would like to fit to a vector valued function. > I can do this using NMinimize, > but in that case I'll lose all the nice statistics NonlinearModelFit > provides us. > Any idea to circumvent this problem? If you are interested I can describe my problem further, with pleasure ;) Similarly, as in the case of Janos I use currently FindMinimum. I am happy with it, I use it together with ParallelSum. The only pain are mentioned already missing "nice statistics". One option would be to create statistics for FindMinimum. I have read that you can get parameter confidence intervals (mostly interesting for me) when you have Hessian matrix, invert it, etc. Anyhow you will also have to evaluate noise of your data. Shortly speaking: something terribly complex for me. Other option would be to do some tricks with NonlinearModelFit. If I had 2D real vector function I could for instance transform it into 1D complex function - problem solved. But my function is 3D! I can still imagine other tricks, like mapping N three-dimensional data points into 3N scalar data points. But my project is already complex. I have 3D convolutions, my function calculates seconds, so I would prefer "elegant" solution. So, any help or suggestion is appreciated. With best regards, Kristof -- Kristof M. Lebecki, Dr, Fachbereich Physik Postfach 674 Universitat Konstanz D-78457 Konstanz, Germany voice: +49 (0)7531 88 - 3796 fax: +49 (0)7531 88 - 5325 web: theorie.physik.uni-konstanz.de/lebecki From mathgroup-adm at smc.vnet.net Fri Jul 29 03:11:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 70F586BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:11:59 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T8C0bH006260; Fri, 29 Jul 2011 03:12:00 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id AB9EABF47F; Fri, 29 Jul 2011 03:12:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B7318BF480; Fri, 29 Jul 2011 03:11:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13353 for mathgroup-newout; Fri, 29 Jul 2011 04:41:33 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13348 for mathgroup-newsend; Fri, 29 Jul 2011 04:41:32 -0400 (EDT) Date: Fri, 29 Jul 2011 04:41:32 -0400 (EDT) Message-Id: <201107290841.EAA13348 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120557] FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.75714 FUNNY STORY: Here is Tech Support's non-response to my problem, described farther down: Hello, Thank you for taking the time to send in this report to us. The accuracy of the financial data depends on how quickly our sources of data provide updates. A 15 minutes delay on current prices is common. Longer delays are possible depending on the data. A complete list of the sources queried by FinancialData is available at: http://reference.wolfram.com/mathematica/note/FinancialDataSourceInformatio n.html We are always looking for alternative sources of financial information to query. If you have any suggestions on alternate sources of information we should consider, please let us know. Sincerely, Sean Clarke ======================================================================== Now, isn't that special? The data is 5 months old, and TS tells me there's a 15-minute delay? ======================================================================== I've found a new (to me) species of error in FinancialData. One example is the price of the following stock on Feb 10, 2011: s = "JANFX"; FinancialData["JANFX", "Name"] FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] "Janus Flexible Bond Fund D Shar" {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, 10.24}} As you see, FinancialData says the price was 10.23. But I BOUGHT the stock through Janus Funds on that day, and the price was 10.36. Moreover, if I go to Yahoo's interactive price chart for the stock at the following page, 10.36 is the price I find: http://finance.yahoo.com/echarts?s=JANFX+Interactive#chart3:symbol=janfx;range=ytd;indicator=volume;charttype=line;crosshair=on;ohlcvalues=0;logscale=on;source=undefined So... where are the errors really coming from? This is not an astronomically large price or a Missing["Not Available"] price; it's within 2% of the correct price. But it's wrong. These errors make it very difficult to trust FinancialData for any useful purpose. Bobby -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Fri Jul 29 03:14:05 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 905626BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:14:05 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T8E6gc006478; Fri, 29 Jul 2011 03:14:06 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9273DBF47C; Fri, 29 Jul 2011 03:14:06 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 91C6ABF42E; Fri, 29 Jul 2011 03:14:04 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13333 for mathgroup-newout; Fri, 29 Jul 2011 04:41:11 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13328 for mathgroup-newsend; Fri, 29 Jul 2011 04:41:10 -0400 (EDT) Date: Fri, 29 Jul 2011 04:41:10 -0400 (EDT) Message-Id: <201107290841.EAA13328 at smc.vnet.net> From: Oliver Ruebenkoenig <ruebenko at wolfram.com> Subject: [mg120555] Re: how to ListPlot3D large data sets References: <201107281153.HAA04026 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.80314 On Thu, 28 Jul 2011, Oliver Ruebenkoenig wrote: > On Wed, 27 Jul 2011, Ted Sariyski wrote: > >> Hi, >> >> In one attempt MaxPlotPoints did not help, but I was not persistent >> because I have to resolve other issues before I return to ListPlot3D. >> One issue is that I cannot pack data. On the big data set I verify that >> it is numeric array and still I cannot get it packed. Here is an example: >> >> mydata={{0.00100,10.,0.},{0.00100,10.,0.00100},{0.00100,10.,0.00200},{0.00100,10.,0.00300},{0.00100,10.,0.00400}}; >> >> MatrixQ[mydata,NumericQ] >> True >> >> myPackedData=ToPackedArray[mydata,Real]; >> >> MatrixQ[myPackedData, NumericQ] >> True >> >> PackedArrayQ[myPackedData] >> False >> >> What I am doing wrong? >> Thanks, >> --Ted > > > Ted, possibly ToPackedArray are not on you context path > > either try > > <<Developer` > > or > > mydata = {{0.00100, 10., 0.}, {0.00100, 10., 0.00100}, {0.00100, 10., > 0.00200}, {0.00100, 10., 0.00300}, {0.00100, 10., 0.00400}}; > myPackedData = Developer`ToPackedArray[mydata, Real]; > Developer`PackedArrayQ[myPackedData] > > Oliver Daniel Lichtblau actually pointed out to me that I might have misunderstood the implications of you result. Some comments: Entering a list like mydata by "hand" (tying, cut©&paste) will always be an unpacked list. You'd have to check PackedArrayQ directly on the import of your large data set, assuming that returned False, you could wrap a N[yourLargeDataImport] around it and see if it then is packed. Should that still not be the case, there might be non numerical stuff in your imported list and you could give it a shot at removing that and the see if and that affects performance for you plot. I hope this helps in a better way. Oliver > >> >> On 7/25/2011 7:30 AM, Oliver Ruebenkoenig wrote: >>> On Sat, 23 Jul 2011, Ted Sariyski wrote: >>> >>>> Hi, >>>> I guess I am pushing the limits of ListPlot3D. I try to ListPlot3d a data >>>> set with many millions of records. I was not able to get an image from the >>>> full dataset, it takes forever. If I use e.g. every fifth record, although >>>> slow, I get an image. The machine running Mathematica is Windows 7 (64 bit), >>>> has 24 GB RAM and there was no swapping. I wonder what is considered as a >>>> reasonable data size for ListPlot3D and are there other tools in Mathematica >>>> for visualization of large data sets? >>>> Thanks in advance, >>>> --Ted >>>> >>>> >>>> >>> Ted, >>> >>> is your data packed? >>> >>> Developer`PackedArrayQ[yourData] >>> >>> Oliver >>> >> >> >> > > From mathgroup-adm at smc.vnet.net Fri Jul 29 03:15:03 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 22BD56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 03:15:03 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6T8F4Vh006563; Fri, 29 Jul 2011 03:15:04 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 5CF8DA8138; Fri, 29 Jul 2011 03:15:04 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 56791FF008; Fri, 29 Jul 2011 03:15:02 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13452 for mathgroup-newout; Fri, 29 Jul 2011 04:43:48 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id EAA13447 for mathgroup-newsend; Fri, 29 Jul 2011 04:43:47 -0400 (EDT) Date: Fri, 29 Jul 2011 04:43:47 -0400 (EDT) Message-Id: <201107290843.EAA13447 at smc.vnet.net> From: Richard Kendall-Smith <richpks at gmail.com> Subject: [mg120569] Re: Roots of a Jacobi polynomial References: <201107261107.HAA09296 at smc.vnet.net> <4E2EFAAD.60403 at wolfram.com> <201107281154.HAA04077 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.80314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P5 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __RUS_OBFU_PHONE 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hi, I'm trying to solve a set of non-linear equations by doing the following: eqlist = {101.74 == a + ((0.055/(479248/c))*(352343 + ((479248/c)*a) - (158194*b/c))), 47205 + ((158194/c)*a) - ((61842/c)*b) == 68043.98 + (299.73*b), 460584 + (479248*(a^2)/(c^2)) - (158194*b*a/(c^2)) + (61842*(b^2)/(c^2)) == 21986 + (3576*c)} NSolve[eqlist, {a, b, c}, Reals] But it interprets c as Musical Notation. I have tried altering the variables to x y and z but then it comes up with a Visual Form error. I'm new to Mathematica but I don't see why this is happening because aren't we specifying a, b, c as variables to be solved? Thanks, Richard On Thu, Jul 28, 2011 at 5:54 AM, Jacopo Bertolotti <J.Bertolotti at utwente.nl>wrote: > On 07/26/2011 07:34 PM, Daniel Lichtblau wrote: > > On 07/26/2011 06:07 AM, Jacopo Bertolotti wrote: > >> Dear MathGroup, > >> Mathematica implements Jacobi polynomials as JacobiP[n,a,b,x] where n is > >> the order of the polynomial. As it can be checked plotting it a Jacobi > >> polynomial has n real roots in the interval [-1,1] and it goes rapidly > >> to infinity outside this interval (at least when both a and b are>-1). > >> The problem arise when you try to find the roots of such a polynomial > >> for a relatively high value of n. As an example the command > >> NSolve[JacobiP[20, -0.5, -0.5, x] == 0, x] correctly returns > >> > >> {{x -> -0.99702}, {x -> -0.972111}, {x -> -0.92418}, {x -> > >> -0.852398}, > >> {x -> -0.760555}, {x -> -0.649375}, {x -> -0.522529}, {x -> > >> -0.382672}, > >> {x -> -0.233449}, {x -> -0.0784582}, {x -> 0.0784591}, {x -> > >> 0.233445}, > >> {x -> 0.382684}, {x -> 0.522504}, {x -> 0.649423}, {x -> > >> 0.760466}, {x > >> -> 0.852539}, {x -> 0.924002}, {x -> 0.972267}, {x -> 0.996958}} > >> > >> while NSolve[JacobiP[25, -0.5, -0.5, x] == 0, x] gives > >> > >> {{x -> -1.01869}, {x -> -0.979859 - 0.0479527 I}, {x -> -0.979859 + > >> 0.0479527 I}, {x -> -0.870962 - 0.070991 I}, {x -> -0.870962 + > >> 0.070991 > >> I}, {x -> -0.71378 - 0.0505783 I}, {x -> -0.71378 + 0.0505783 I}, > >> {x -> > >> -0.571283}, {x -> -0.486396}, {x -> -0.367829}, {x -> -0.248377}, > >> {x -> > >> -0.125513}, {x -> -0.0000434329}, {x -> 0.125442}, {x -> 0.2489}, > >> {x -> > >> 0.365644}, {x -> 0.496977}, {x -> 0.555743}, {x -> 0.717741- > >> 0.0573399 > >> I}, {x -> 0.717741+ 0.0573399 I}, {x -> 0.87423- 0.0652273 I}, {x -> > >> 0.87423+ 0.0652273 I}, {x -> 0.977876- 0.0422422 I}, {x -> 0.977876+ > >> 0.0422422 I}, {x -> 1.01494}} > >> > >> i.e. both complex roots and roots outside the [-1,1] interval. > >> Substituting any of these values back into the polynomial easily show > >> that these values are not roots at all. Also notice that using the > >> command Root (e.g. Sort@Table[Root[JacobiP[25, -0.5, -0.5, x], i], {i, > >> 1, 25}]) gives different but still wrong results. > >> On a related note: NIntegrate sometimes gives wrong results when > >> integrating function of the form (1-x)^a (1+x)^b f[x] and I feel this > >> might related to the Gauss-Jacobi quadrature failing to retrieve the > >> correct roots of a Jacobi polynomial. > >> > >> Do anyone have a solution for that? > >> > >> Thank you > >> > >> Jacopo > > > > This is not a well conditioned problem. To do better you'll need to > > allow NSolve to use higher precision by not giving machine numbers in > > the input. > > > > In[102]:= solns = Sort[NSolve[JacobiP[25, -1/2, -1/2, x] == 0, x]] > > > > Out[102]= {{x -> -0.998027}, {x -> -0.982287}, {x -> -0.951057}, {x \ > > -> -0.904827}, {x -> -0.844328}, {x -> -0.770513}, {x -> -0.684547}, \ > > {x -> -0.587785}, {x -> -0.481754}, {x -> -0.368125}, {x -> \ > > -0.24869}, {x -> -0.125333}, {x -> 0.}, {x -> 0.125333}, {x -> > > 0.24869}, {x -> 0.368125}, {x -> 0.481754}, {x -> 0.587785}, {x -> > > 0.684547}, {x -> 0.770513}, {x -> 0.844328}, {x -> 0.904827}, {x -> > > 0.951057}, {x -> 0.982287}, {x -> 0.998027}} > > > > These might seem imperfect when you check residuals (see below). In > > fact they are not at all bad. We first show that by comparing to > > higher precision versions that do validate fairly well as giving > > smallish residuals. > > > > In[104]:= solns30 = > > Sort[NSolve[JacobiP[25, -1/2, -1/2, x] == 0, x, > > WorkingPrecision -> 30]] > > > > Out[104]= {{x -> -0.998026728428271561952336806863}, {x -> \ > > -0.982287250728688681085641742865}, {x -> \ > > -0.951056516295153572116439333379}, {x -> \ > > -0.904827052466019527713668647933}, {x -> \ > > -0.844327925502015078548558063967}, {x -> \ > > -0.770513242775789230803009636396}, {x -> \ > > -0.684547105928688673732283357621}, {x -> \ > > -0.587785252292473129168705954639}, {x -> \ > > -0.481753674101715274987191502872}, {x -> \ > > -0.368124552684677959156947147493}, {x -> \ > > -0.248689887164854788242283746006}, {x -> \ > > -0.125333233564304245373118759817}, {x -> 0}, {x -> > > 0.125333233564304245373118759817}, {x -> > > 0.248689887164854788242283746006}, {x -> > > 0.368124552684677959156947147493}, {x -> > > 0.481753674101715274987191502872}, {x -> > > 0.587785252292473129168705954639}, {x -> > > 0.684547105928688673732283357621}, {x -> > > 0.770513242775789230803009636396}, {x -> > > 0.844327925502015078548558063967}, {x -> > > 0.904827052466019527713668647933}, {x -> > > 0.951056516295153572116439333379}, {x -> > > 0.982287250728688681085641742865}, {x -> > > 0.998026728428271561952336806863}} > > > > This shows the two results are quite close. > > > > In[106]:= Max[Abs[(x /. solns) - (x /. solns30)]] > > Out[106]= 4.47615*10^-10 > > > > This shows the high precision solutions give reasonable residuals. > > > > In[108]:= Max[Abs[JacobiP[25, -1/2, -1/2, x] /. solns30]] > > Out[108]= 0.*10^-12 > > > > The machine precision results will not give good residuals. There are > > two possible (and related) reasons. One is that the conditioning is > > such that we are bound to lose many digits in assessing residuals (as > > seems to happen above). The other is that the form of JacobiP > > polynomials might just be inducing cancellation error. > > > > Certainly this second item is part of the problem: > > > > In[109]:= Max[Abs[Expand[JacobiP[25, -1/2, -1/2, x]] /. solns30]] > > Out[109]= 0.*10^-21 > > > > Here are the corresponding machine precision evaluations of residuals. > > > > In[112]:= Max[Abs[JacobiP[25, -1/2, -1/2, x] /. solns]] > > Out[112]= 17. > > > > In[113]:= Max[Abs[Expand[JacobiP[25, -1/2, -1/2, x]] /. solns]] > > Out[113]= 9.31323*10^-9 > > > > Daniel Lichtblau > > Wolfram Research > > > Thank you Daniel. And thank you also to everyone who wrote me > suggestions (both here and in private). The combination of not using > machine number in the input and increasing the WorkingPrecision seems to > work fine. Apparently just using one of the two tricks do not yield any > sensible result. > > Jacopo > > From mathgroup-adm at smc.vnet.net Fri Jul 29 06:09:14 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AA1306BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:09:14 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TB9FuD004369; Fri, 29 Jul 2011 06:09:16 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 94F13BF4AE; Fri, 29 Jul 2011 06:09:15 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E4A1FA815B; Fri, 29 Jul 2011 06:09:13 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15676 for mathgroup-newout; Fri, 29 Jul 2011 08:02:07 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15671 for mathgroup-newsend; Fri, 29 Jul 2011 08:02:06 -0400 (EDT) Date: Fri, 29 Jul 2011 08:02:06 -0400 (EDT) Message-Id: <201107291202.IAA15671 at smc.vnet.net> From: Alexey Popkov <lehin.p at gmail.com> Subject: [mg120571] Is it possible to delete "context" from the list of loaded Contexts[]? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.105414 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_200_299 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hello, We can remove all symbols in a particular context by using Remove["context`*"]. But is it possible to remove "context`" itself from the system so that it will no longer be listed in Contexts[]? From mathgroup-adm at smc.vnet.net Fri Jul 29 06:09:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E9EFA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:09:40 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TB9gic004423; Fri, 29 Jul 2011 06:09:42 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 32001BF483; Fri, 29 Jul 2011 06:09:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 9ADE3A81BA; Fri, 29 Jul 2011 06:09:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15654 for mathgroup-newout; Fri, 29 Jul 2011 08:01:56 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15650 for mathgroup-newsend; Fri, 29 Jul 2011 08:01:55 -0400 (EDT) Date: Fri, 29 Jul 2011 08:01:55 -0400 (EDT) Message-Id: <201107291201.IAA15650 at smc.vnet.net> From: gopher <gophergoon at gmail.com> Subject: [mg120570] NIntegrate issue with symbolic parameters To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.105414 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_700_799 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. The docs say that NIntegrate evaluates the integrand with the variables being symbolic, and then repeatedly evaluates the result numerically. This is a problem for me as my integrand calls Eigenvectors which results in a symbolic calculation of the eigenvectors. If the variables were passed numerically instead, there would be no problem. In the end, I get errors about oscillation and convergence, 'slwcon' and 'eincr', which should never occur since the integrand is actually constant! (theoretically and also confirmed by Plot3D). Is there a way out? Since the details are a bit long, I am putting a link to the file below: https://netfiles.uiuc.edu/aroy2/www/nintegrate-issue.nb Thanks for any help, Abhishek From mathgroup-adm at smc.vnet.net Fri Jul 29 06:09:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9CEA86BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:09:59 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TBA020004438; Fri, 29 Jul 2011 06:10:00 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id AE959A81BA; Fri, 29 Jul 2011 06:10:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id EB096A81B0; Fri, 29 Jul 2011 06:09:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15698 for mathgroup-newout; Fri, 29 Jul 2011 08:02:40 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15692 for mathgroup-newsend; Fri, 29 Jul 2011 08:02:39 -0400 (EDT) Date: Fri, 29 Jul 2011 08:02:39 -0400 (EDT) Message-Id: <201107291202.IAA15692 at smc.vnet.net> From: A Retey <awnl at gmx-topmail.de> Subject: [mg120574] Re: CompressedData in Buttons References: <j0trvu$d59$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.105414 Hi, > I have some Buttons that display various data, e.g., area, > population, density, etc. of U.S. states, and would like to update > the data. I have only the buttons, not the Input code that produced > them long ago. Using Show Expression on the button reveals that, > instead of being in List form, much of the data appears as > "CompressedData[ ... (gibberish) ...]. > > How can I recover the original, uncompressed, data so that I can > revise it? I found nothing in the Documentation Center or Virtual > Book, and none of the 74 hits on wolfram.com appear to shed any > relevant light. I think you will just need to apply Uncompress to the "glibberish", which should be a string. If you have the CompressedData[..] as an expression, you can convert the compressed part with: CompressedData["..."] /. Verbatim[CompressedData][s_String] :> Uncompress[s] hth, albert From mathgroup-adm at smc.vnet.net Fri Jul 29 06:12:22 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4ABCD6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:12:22 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TBCM1k004712; Fri, 29 Jul 2011 06:12:22 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 23344BF482; Fri, 29 Jul 2011 06:12:22 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 07409BF480; Fri, 29 Jul 2011 06:12:20 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15690 for mathgroup-newout; Fri, 29 Jul 2011 08:02:29 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15685 for mathgroup-newsend; Fri, 29 Jul 2011 08:02:28 -0400 (EDT) Date: Fri, 29 Jul 2011 08:02:28 -0400 (EDT) Message-Id: <201107291202.IAA15685 at smc.vnet.net> From: gal bevc <gal.bevc at gmail.com> Subject: [mg120573] Poincare section for double pendulum To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.110315 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1400_1499 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hello, I'm a relatively new user of Mathematica, who doesn't have much of programming skills. For my undergraduate assingment I must analyze chaotic motion of double pendulum. Until now i have got system of differential equations for equations of motion for double pendulum(i have x''[t]=function(t) and y''[t]=function(t)). System of differential equations can be solved for 4 inital conditions, x[0],y[0],x'[0] and y'[0]. With using function NDSolve i got functions of angles and angular velocities for upper and lower pendulum with respect to time, x[t],x'[t],y[t] and y'[t]. To get a poincare section of double pendulum, i have to record position of y[t] and y'[t] whenever x[t] is equal to zero and the velocity of x'[t] is a positive number. In the end I must get some sort of phase diagram y[t] and y'[t]. Because this is a Hamilton non-dissipative system, inital energy of the system is a constant of time and initial energy is a function of initial conditions. To get a real poincare diagram i must repeat the procedure described above for different initial conditions, but for the same energy level. I need mathematica to use some random numbers for initial conditions in a way that the initial energy of the system stays the same. So i must repeat procedure for poincare section(surface of section) for let's say 50 different initial conditions and then display all results in one y[t],y'[t] diagram. Hope that someone can help me. Thank you, Gal Bevc From mathgroup-adm at smc.vnet.net Fri Jul 29 06:14:09 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 664406BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:14:09 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TBEAIl004868; Fri, 29 Jul 2011 06:14:10 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 6CCB5BF482; Fri, 29 Jul 2011 06:14:10 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 893F5BF480; Fri, 29 Jul 2011 06:14:08 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15684 for mathgroup-newout; Fri, 29 Jul 2011 08:02:18 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15679 for mathgroup-newsend; Fri, 29 Jul 2011 08:02:17 -0400 (EDT) Date: Fri, 29 Jul 2011 08:02:17 -0400 (EDT) Message-Id: <201107291202.IAA15679 at smc.vnet.net> From: Pierpaolo Bernardi <olopierpa at gmail.com> Subject: [mg120572] Re: FinancialData errors References: <201107222344.TAA28525 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.110315 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1500_1599 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_1 0, __STOCK_PHRASE_6 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Fri, Jul 29, 2011 at 10:41, DrMajorBob <btreat1 at austin.rr.com> wrote: > FUNNY STORY: Here is Tech Support's non-response to my problem, described > farther down: > I've found a new (to me) species of error in FinancialData. > > One example is the price of the following stock on Feb 10, 2011: > > s = "JANFX"; > FinancialData["JANFX", "Name"] > FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] > > "Janus Flexible Bond Fund D Shar" > > {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, > =C2 =C2 10.24}} > > As you see, FinancialData says the price was 10.23. > > But I BOUGHT the stock through Janus Funds on that day, and the price was > 10.36. > > Moreover, if I go to Yahoo's interactive price chart for the stock at the > following page, 10.36 is the price I find: Prices do vary continuously, they don't stay the same for a whole day, At the moment you bought it was 10.36. At the moment the data source was sampled it was 10.23. Usually historical data use the closing price, AFAIK. I see nothing strange in this. > So... where are the errors really coming from? > > This is not an astronomically large price or a Missing["Not Available"] > price; it's within 2% of the correct price. But it's wrong. > > These errors make it very difficult to trust FinancialData for any useful > purpose. If a difference of less than 2% in the historical market data influences your algorithms, I won't trust your conclusions. :) Cheers From mathgroup-adm at smc.vnet.net Fri Jul 29 06:15:54 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7A5826BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:15:54 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TBFtjw005068; Fri, 29 Jul 2011 06:15:55 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id A1140A8170; Fri, 29 Jul 2011 06:15:55 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id D680FA8169; Fri, 29 Jul 2011 06:15:53 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15704 for mathgroup-newout; Fri, 29 Jul 2011 08:02:51 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15699 for mathgroup-newsend; Fri, 29 Jul 2011 08:02:50 -0400 (EDT) Date: Fri, 29 Jul 2011 08:02:50 -0400 (EDT) Message-Id: <201107291202.IAA15699 at smc.vnet.net> From: Dilek <genetik08 at gmail.com> Subject: [mg120575] Re: Code is not working... References: <201107222347.TAA28685 at smc.vnet.net> <j0foq7$8ov$1 at smc.vnet.net> <j0h090$dgi$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.110315 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_MEDIA_BODY 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On 24 Temmuz, 07:39, Jay Bee <jiri.bo... at gmail.com> wrote: > On Jul 24, 1:25 am, Heike Gramberg <heike.gramb... at gmail.com> wrote: > > > > > > > If you want any useful help you'll probably need to give a bit more > > information. For example, what are > > image, RegionGrowing and imgfilter? And what is the function of > > imageFilled (it doesn't seem to do anything > > at the moment)? > > > Heike. > > > On 23 Jul 2011, at 00:47, =?iso-8859-1?Q?S=F6nme... at smc.vnet.net wr= ot= > e: > > > > Hello, > > > > I am in trouble with below codes: > > > > I run this code but Program is not finsh evertime It is running and r= un= > ning... > > > Could you possible help me. > > > > dim = Dimensions[image] > > > r = 1; > > > k = 1; > > > n = 10; > > > cost = Function[{positionValues, neighborValues}, > > > =C2 First[neighborValues] == 1]; > > > > (* Image that only contains the value zero *) > > > imageNew = Table[0, {i, 1, dim[[1]]}, {j, 1, dim[[2]]}]; > > > > (* Walk through the rows of the image *) > > > While[r < dim[[1]], > > > =C2 (* Walk through the columns of the image*) > > > =C2 k = 1; > > > =C2 While[k < dim[[2]], > > > =C2 (* Find a white pixel*) > > > =C2 If[imgfilter[[r, k]] == 1, > > > =C2 =C2 (* Proceed RegionGrowing and give them a identical value= by \ > > > multiplying it with n *) > > > =C2 =C2 region = RegionGrowing[{imgfilter}, {{r, k}}, 1, cost]= *n; > > > =C2 =C2 (* Add the identical cell to imageNew *) > > > =C2 =C2 imageNew = imageNew + region; > > > =C2 =C2 (* Change n, so each cell has a different value *) > > > =C2 =C2 n = n + 2;As > > > =C2 =C2 (* Take the cell out of the original image, > > > =C2 =C2 so he will stop when there is no white pixel anymore *) > > > =C2 =C2 imageFilled = imgfilter - region; > > > =C2 =C2 ]; > > > =C2 k++; > > > =C2 ]; > > > =C2 r++; > > > =C2 ]; > > As Heike asked, what are those functions you use? If the computation > lasts forever, there must be some bug... Check all braces - correct > number and position, if all the inputs and outputs have an expected > format, and so on...- Al=C4=B1nt=C4=B1y=C4=B1 gizle - > > - Al=C4=B1nt=C4=B1y=C4=B1 g=C3=B6ster - Thank you for your answers. But There is a problem too that I don't know how must I give inform about the region growing function. Could you possible say me how can I do it? From mathgroup-adm at smc.vnet.net Fri Jul 29 06:18:14 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A01726BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Fri, 29 Jul 2011 06:18:14 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6TBIF8d005233; Fri, 29 Jul 2011 06:18:15 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9AB2DBF47C; Fri, 29 Jul 2011 06:18:15 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A36FFA815B; Fri, 29 Jul 2011 06:18:13 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15710 for mathgroup-newout; Fri, 29 Jul 2011 08:03:02 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA15705 for mathgroup-newsend; Fri, 29 Jul 2011 08:03:01 -0400 (EDT) Date: Fri, 29 Jul 2011 08:03:01 -0400 (EDT) Message-Id: <201107291203.IAA15705 at smc.vnet.net> From: "Fabrice P. Laussy" <fabrice.laussy at gmail.com> Subject: [mg120576] Memory leak or flawed garbage collector To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.29.110914 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODY_SIZE_6000_6999 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __CP_MEDIA_2_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __OEM_PRICE 0, __SANE_MSGID 0, __STOCK_PHRASE_7 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Dear Group, I have a problem of garbage collection or of memory leak, with a module that will seemingly not discard its internal variables, thus leading to explosion of memory usage by repeated calls to this module. Opening the notebook, nothing else being done yet: In[1]:= MemoryInUse[] Out[1]= 18460176 Then I define the said module, with private variables, etc. Before running the first instance of it, already there appears many variables, some defined globally, others with the $ of internal variables: ?Global`* Global` A coef Disa$ g2 K\[Sigma]3$ L\[Sigma]1 mybasis n\[Sigma]3 re$ X \[Gamma] \[Nu]\[Nu] \[Omega]3$ AllM coefa Dis\[Sigma]1 g3 L L\[Sigma]1$ mybasis$ n\[Sigma]3$ solMean Xsol \[Gamma]1 \[Nu]\[Nu]\[Nu] \[Omega]a AllM$ coefa$ Dis\[Sigma]1$ i La L\[Sigma]2 myvar n$ solMean$ Xsol$ \[Gamma]2 \[Nu]\[Nu]\[Nu]$ \[Omega]a$ Av coef\[Sigma]1 eig im La$ L\[Sigma]2$ m\[CapitalDelta] order Spea x$ \[Gamma]3 \[Nu]\[Nu]$ \[Omega]max Average coef\[Sigma]1$ eigV im$ lcor L\[Sigma]3 m$ out Spea$ X$ \[Gamma]a \[Nu]$ \[Omega]min Average$ coef\[Sigma]2 eigV$ Ind lcor$ L\[Sigma]3$ M$ out$ Spectra3dots y \[CapitalDelta] \[CapitalSigma]1 Av$ coef\[Sigma]2$ eig$ Ind$ lmean L$ n P Spe\[Sigma]1 y$ \[CapitalDelta]1 \[CapitalSigma]1$ A$ coef\[Sigma]3 eme i$ lmean0 m na P1 Spe\[Sigma]1$ \[Alpha] \[CapitalDelta]2 \[CapitalSigma]2 broad coef\[Sigma]3$ emeB j lmean0$ M na$ P2 Spe\[Sigma]2 \[Alpha]a \[CapitalDelta]3 \[CapitalSigma]2$ broad$ coef$ emeB$ j$ lmean$ M1 nmax P3 Spe\[Sigma]2$ \[Alpha]a$ \[Delta]\[Omega] \[CapitalSigma]3 c Corr eme$ Ka Lora M1$ nn Pa Spe\[Sigma]3 \[Alpha]\[Sigma]1 \[Mu] \[CapitalSigma]3$ case CorrSpec ene Ka$ Lora$ M2 nn$ re Spe\[Sigma]3$ \[Alpha]\[Sigma]1$ \[Mu]\[Mu] \[Omega] Change CorrSpec$ ene$ K\[Sigma]1 Lor\[Sigma]1 M2$ nt regmat Tota \[Alpha]\[Sigma]2 \[Mu]\[Mu]\[Mu] \[Omega]1 ChangeBack Corr$ f1 K\[Sigma]1$ Lor\[Sigma]1$ Me n\[Sigma]1 RegMat3dots Tota$ \[Alpha]\[Sigma]2$ \[Mu]\[Mu]\[Mu]$ \[Omega]1$ ChangeBack$ Co$ f1$ K\[Sigma]2 ls Me$ n\[Sigma]1$ RegMatrix Tot\[Sigma]1 \[Alpha]\[Sigma]3 \[Mu]\[Mu]$ \[Omega]2 Change$ c$ fs K\[Sigma]2$ ls$ mm n\[Sigma]2 RegMatrix$ Tot\[Sigma]1$ \[Alpha]\[Sigma]3$ \[Mu]$ \[Omega]2$ Co Disa g1 K\[Sigma]3 l\[CapitalDelta]1 mm$ n\[Sigma]2$ regmat$ x \[Alpha]$ \[Nu] \[Omega]3 After running the first instance of the module: In[32]:= MemoryInUse[] Out[32]= 26536288 After running the second instance: In[35]:= MemoryInUse[] Out[35]= 32878688 Etc., the memory will keep increasing, although each module runs a separate case and could be computed in separate notebooks, thus the amount of required memory should be the same. The variables indeed keep cluttering things from the various instances of the module: ?Global`* Global` A coef\[Sigma]1 eig$ i$ lcor$ m n P3 Spe\[Sigma]1 \[Alpha]a$ \[Mu]\[Mu]\[Mu] \[Omega]1$632 AllM coef\[Sigma]1$ eme i$646 lcor$646 M na Pa Spe\[Sigma]1$ \[Alpha]\[Sigma]1 \[Mu]\[Mu]\[Mu]$ \[Omega]1$647 AllM$ coef\[Sigma]2 emeB j lmean M1 na$ re Spe\[Sigma]2 \[Alpha]\[Sigma]1$ \[Mu]\[Mu]$ \[Omega]1$648 Av coef\[Sigma]2$ emeB$ j$ lmean0 M1$ nmax regmat Spe\[Sigma]2$ \[Alpha]\[Sigma]2 \[Mu]$ \[Omega]2 Average coef\[Sigma]3 eme$ Ka lmean0$ M2 nn RegMat3dots Spe\[Sigma]3 \[Alpha]\[Sigma]2$ \[Nu] \[Omega]2$ Average$ coef\[Sigma]3$ ene Ka$ lmean$ M2$ nn$ RegMatrix Spe\[Sigma]3$ \[Alpha]\[Sigma]3 \[Nu]\[Nu] \[Omega]2$630 Av$ coef$ ene$ Ka$629 Lora Me nt RegMatrix$ Tota \[Alpha]\[Sigma]3$ \[Nu]\[Nu]\[Nu] \[Omega]2$632 A$ Corr f1 Ka$646 Lora$ Me$ n\[Sigma]1 RegMatrix$630 Tota$ \[Alpha]$ \[Nu]\[Nu]\[Nu]$ \[Omega]2$647 broad CorrSpec f1$ K\[Sigma]1 Lor\[Sigma]1 mm n\[Sigma]1$ RegMatrix$632 Tot\[Sigma]1 \[Gamma] \[Nu]\[Nu]$ \[Omega]2$648 broad$ CorrSpec$ fs K\[Sigma]1$ Lor\[Sigma]1$ mm$ n\[Sigma]2 RegMatrix$647 Tot\[Sigma]1$ \[Gamma]1 \[Nu]$ \[Omega]3 c Corr$ g1 K\[Sigma]2 ls mybasis n\[Sigma]2$ RegMatrix$648 x \[Gamma]2 \[CapitalSigma]1 \[Omega]3$ case Co$ g2 K\[Sigma]2$ ls$ mybasis$ n\[Sigma]3 regmat$ X \[Gamma]3 \[CapitalSigma]1$ \[Omega]a Change c$ g3 K\[Sigma]3 l\[CapitalDelta]1 myvar n\[Sigma]3$ re$ Xsol \[Gamma]a \[CapitalSigma]2 \[Omega]a$ ChangeBack Disa i K\[Sigma]3$ L\[Sigma]1 m\[CapitalDelta] n$ re$629 Xsol$ \[CapitalDelta] \[CapitalSigma]2$ \[Omega]a$630 ChangeBack$ Disa$ im L L\[Sigma]1$ m$ order re$646 x$ \[CapitalDelta]1 \[CapitalSigma]3 \[Omega]a$632 Change$ Dis\[Sigma]1 im$ La L\[Sigma]2 M$ out solMean X$ \[CapitalDelta]2 \[CapitalSigma]3$ \[Omega]a$647 Co Dis\[Sigma]1$ im$629 La$ L\[Sigma]2$ M$630 out$ solMean$ y \[CapitalDelta]3 \[Omega] \[Omega]a$648 coef eig im$646 La$629 L\[Sigma]3 M$632 P Spea y$ \[Delta]\[Omega] \[Omega]1 \[Omega]max coefa eigV Ind La$646 L\[Sigma]3$ M$647 P1 Spea$ \[Alpha] \[Mu] \[Omega]1$ \[Omega]min coefa$ eigV$ Ind$ lcor L$ M$648 P2 Spectra3dots \[Alpha]a \[Mu]\[Mu] \[Omega]1$630 Now, if we take for instance, RegMatrix$632, which appears in the list above. It seems to take no memory: In[39]:= ByteCount[RegMatrix$632] Out[39]= 0 But it clearly is stored in memory: ?RegMatrix$632 Global`RegMatrix$632 Attributes[RegMatrix$632]={Temporary} RegMatrix$632[{0,0,0,0,0,0,0,0},{-1,-1,0,0,0,0,0,0}]=0. RegMatrix$632[{0,0,0,0,0,0,0,0},{-1,0,0,0,0,0,1,0}]=0 RegMatrix$632[{0,0,0,0,0,0,0,0},{-1,0,0,0,1,0,0,0}]=0 [snip] (a lot of more stuff here), and if I remove it: In[47]:= MemoryInUse[] Out[47]= 32879624 In[48]:= Remove[RegMatrix$632] In[49]:= MemoryInUse[] Out[49]= 29521760 So clearly, along with all the other stuff lying around, it accounts for this filling up of the memory. It seems there is a problem with garbage collection and disposing of local variables defined within a module. I don't think there is anything special with the module itself. It calls other modules defined externally. At the same time the problem does not seem reproducible defining a toy-module and looking for the same behaviour. Does this problem seem familiar? Strange? What could be causing it? From mathgroup-adm at smc.vnet.net Sat Jul 30 04:05:38 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 6EB6E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:05:38 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U95dxZ027565; Sat, 30 Jul 2011 04:05:39 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id A0D39A8110; Sat, 30 Jul 2011 04:05:39 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id CB41CA80BA; Sat, 30 Jul 2011 04:05:37 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25268 for mathgroup-newout; Sat, 30 Jul 2011 05:58:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25264 for mathgroup-newsend; Sat, 30 Jul 2011 05:58:46 -0400 (EDT) Date: Sat, 30 Jul 2011 05:58:46 -0400 (EDT) Message-Id: <201107300958.FAA25264 at smc.vnet.net> From: lorenzo <lorenzo_ktm at yahoo.it> Subject: [mg120578] [Mathematica] special iterator To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.85115 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_300_399 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Hello everybody, I would like to define an iterator to explore all the elements in a list except for the one of index j. something like: {index,0,Length[myList]} and if index == j ---> index++ Is it possible? Can I do this without deleting the j-th element? Thank you very much for helping :) From mathgroup-adm at smc.vnet.net Sat Jul 30 04:06:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1E3636BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:06:52 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U96rGF027651; Sat, 30 Jul 2011 04:06:53 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 681DDBF42E; Sat, 30 Jul 2011 04:06:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 8267BA8110; Sat, 30 Jul 2011 04:06:47 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25333 for mathgroup-newout; Sat, 30 Jul 2011 06:00:15 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25328 for mathgroup-newsend; Sat, 30 Jul 2011 06:00:14 -0400 (EDT) Date: Sat, 30 Jul 2011 06:00:14 -0400 (EDT) Message-Id: <201107301000.GAA25328 at smc.vnet.net> From: =?ISO-8859-1?Q?Jorge_A=2E_L=F3pez_L=F3pez?= <jorgext at gmail.com> Subject: [mg120586] Ctrl+Number Shortcuts doesn't work To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.24.233314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hello All, I have Mathematica 8, with Mac OS X. My Problem: When I want to add a superscript the shortcut is "Ctrl+6", it doesn't work, if I use the Writing Assistant tool the superscript appears with no errors. It also happen with any combination, like "Ctrl+2", for square root. Other kind of combinations, for example, "Ctrl+Shift+7" gives a fraction, with no problems, also "Ctrl+_" works for subscripts What I have done: Reseting Mathematica preferences by pressing "Option+Shift" and opening the program waiting for full start, did not work. Removing "/Library/Mathematica/" and "Library/Mathematica/" folders, I don't know if there are more pref. folders in the system, after this I had to reenter activation keys, like a new installation but it did not worked. Well, please send help. Best Regards, -- Jorge L=F3pez From mathgroup-adm at smc.vnet.net Sat Jul 30 04:08:10 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4727A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:08:10 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U98B5v027708; Sat, 30 Jul 2011 04:08:11 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9D1EFBF47F; Sat, 30 Jul 2011 04:08:11 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id ACC75BF42E; Sat, 30 Jul 2011 04:08:09 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25448 for mathgroup-newout; Sat, 30 Jul 2011 06:03:15 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25443 for mathgroup-newsend; Sat, 30 Jul 2011 06:03:14 -0400 (EDT) Date: Sat, 30 Jul 2011 06:03:14 -0400 (EDT) Message-Id: <201107301003.GAA25443 at smc.vnet.net> From: magma <maderri2 at gmail.com> Subject: [mg120602] Re: Path variable References: <j0oo9i$klb$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.85714 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_200_299 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 27, 12:12 pm, "Max B hring" <texu... at arcor.de> wrote: > Hi, > > how do I delete a mistakenly added folder from the $Path variable? > > Thanks, > Max just rewrite the $Path variable without the erroneous path. $Path is just a variable like any other one From mathgroup-adm at smc.vnet.net Sat Jul 30 04:09:18 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8B37D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:09:18 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U99J76027748; Sat, 30 Jul 2011 04:09:19 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 8C899A80BA; Sat, 30 Jul 2011 04:09:19 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 936C4BF47F; Sat, 30 Jul 2011 04:09:17 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25281 for mathgroup-newout; Sat, 30 Jul 2011 05:59:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25276 for mathgroup-newsend; Sat, 30 Jul 2011 05:59:08 -0400 (EDT) Date: Sat, 30 Jul 2011 05:59:08 -0400 (EDT) Message-Id: <201107300959.FAA25276 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120580] Re: FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.85714 Your reply DID stimulate useful experimentation. For instance: FinancialData[ "JANFX", #, {{2011, 2, 10}, {2011, 2, 10}}] & /@ {"Close", "High", "Low", "Open", "Price", "Range", "RawClose", "RawHigh", "RawLow", "RawOpen"} {{{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, {10.23, 10.23}}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}} The high, low, open, price, and range returned are nonsense, but the "Raw" numbers agree with reality, so I may be on the road to what I want. Bobby On Fri, 29 Jul 2011 03:48:42 -0500, Pierpaolo Bernardi <olopierpa at gmail.com> wrote: > On Fri, Jul 29, 2011 at 10:41, DrMajorBob <btreat1 at austin.rr.com> wrote: >> FUNNY STORY: Here is Tech Support's non-response to my problem, >> described >> farther down: > >> I've found a new (to me) species of error in FinancialData. >> >> One example is the price of the following stock on Feb 10, 2011: >> >> s = "JANFX"; >> FinancialData["JANFX", "Name"] >> FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] >> >> "Janus Flexible Bond Fund D Shar" >> >> {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, >> 10.24}} >> >> As you see, FinancialData says the price was 10.23. >> >> But I BOUGHT the stock through Janus Funds on that day, and the price >> was >> 10.36. >> >> Moreover, if I go to Yahoo's interactive price chart for the stock at >> the >> following page, 10.36 is the price I find: > > Prices do vary continuously, they don't stay the same for a whole day, > At the moment you bought it was 10.36. At the moment the data source > was sampled it was 10.23. Usually historical data use the closing > price, AFAIK. I see nothing strange in this. > >> So... where are the errors really coming from? >> >> This is not an astronomically large price or a Missing["Not Available"] >> price; it's within 2% of the correct price. But it's wrong. >> >> These errors make it very difficult to trust FinancialData for any >> useful >> purpose. > > If a difference of less than 2% in the historical market data > influences your algorithms, I won't trust your conclusions. :) > > Cheers -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sat Jul 30 04:10:25 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 48D736BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:10:25 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9AQf0027873; Sat, 30 Jul 2011 04:10:26 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 8D1D8BF483; Sat, 30 Jul 2011 04:10:26 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id B6B8CBF480; Sat, 30 Jul 2011 04:10:24 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25303 for mathgroup-newout; Sat, 30 Jul 2011 05:59:42 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25298 for mathgroup-newsend; Sat, 30 Jul 2011 05:59:41 -0400 (EDT) Date: Sat, 30 Jul 2011 05:59:41 -0400 (EDT) Message-Id: <201107300959.FAA25298 at smc.vnet.net> From: Peter Sisak <p-kun80 at hotmail.com> Subject: [mg120583] Cumulative probability question To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.85714 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_HOTMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_HOTMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I have been experimenting with Mathematica in order to receive answers to my problem, so far without success. I have tried various forms of CDF and HypergeometricDistribution, but I seem to not know the proper addressing of the parameters for the problem. The problem itself is the following (with numbers given for a more illustrative example): Given an urn containing N(=70) items in total, of which n(=4) are marked, we want to draw i(=2) or more marked items. a) What is the formula describing the number of draws required to succeed in drawing at least i items with a probability of at least 50%? b) How do you make a graph of the probability (of drawing at least i items) graphed against the number of draws? c) What are the equations that need to be solved to get a numerical answer on a) and b)? Thank you for your assistance in advance P=E9ter Sis=E1k From mathgroup-adm at smc.vnet.net Sat Jul 30 04:12:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EF5EF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:12:18 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9CKg4028060; Sat, 30 Jul 2011 04:12:20 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 4845DBF47F; Sat, 30 Jul 2011 04:12:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A6A76A80BA; Sat, 30 Jul 2011 04:12:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25389 for mathgroup-newout; Sat, 30 Jul 2011 06:01:43 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25384 for mathgroup-newsend; Sat, 30 Jul 2011 06:01:42 -0400 (EDT) Date: Sat, 30 Jul 2011 06:01:42 -0400 (EDT) Message-Id: <201107301001.GAA25384 at smc.vnet.net> From: Gary Wardall <gwardall at gmail.com> Subject: [mg120594] Re: Why won't this sum evaluate? References: <j0oopr$kse$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.90622 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_800_899 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Jul 27, 5:20 am, PAR123 <reiser.p... at gmail.com> wrote: > In[120]:= $Version > Out[120]= "7.0 for Mac OS X x86 (32-bit) (January 30, 2009)" > > In[122]:= Sum[c^n/(1 + c^(2*n)), {n, 1, Infinity}] > Out[122]= -(1/4) + 1/4 EllipticTheta[3, 0, c]^2 > > In[123]:= Sum[c^n/(1 + c^(2*n)), {n, 0, Infinity}] > Out[123]= (won't simplify) > > The only thing different in the two sums is that the second sum is from 0 to Infinity rather than 1 to Infinity. Clearly, the n=zero term is 1/2. > > I have tried various Regularizations and Methods, (not exhaustively) but none seem to work on either of the sums, much less the last. > > A side problem - Is there a way to determine what Regularization and Method were used when none were specified? > > Thanks I'm using the latest Mac version 8 and I get the same results as you do. Gary Wardall From mathgroup-adm at smc.vnet.net Sat Jul 30 04:14:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C679A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:14:21 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9ENAe028230; Sat, 30 Jul 2011 04:14:23 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 16735BF47F; Sat, 30 Jul 2011 04:14:23 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 44208BF42E; Sat, 30 Jul 2011 04:14:21 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25342 for mathgroup-newout; Sat, 30 Jul 2011 06:00:26 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25337 for mathgroup-newsend; Sat, 30 Jul 2011 06:00:25 -0400 (EDT) Date: Sat, 30 Jul 2011 06:00:25 -0400 (EDT) Message-Id: <201107301000.GAA25337 at smc.vnet.net> From: W Craig Carter <ccarter at mit.edu> Subject: [mg120587] extra lines in framed plots? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.90622 Hello, Does anybody know how to remove the "guide lines" in framed plots. When I do this: ListPlot[{{0.1, 0.2}, {0.5, 0.5}, {0.8, 0.9}}, Frame -> True] I get no extra vertical and horizontal lines. But, this: ListPlot[ {{0.4289099257180531`, 0.5537224743099745`}, {0.7079331672754348`, 0.0798617987377328`}, {0.7626789940630332`, 0.09782702610262328`}, {0.26298609181891597`, 0.23650806653149004`}, {0.9806031473561678`, 0.6881903807736833`}, {0.9182772394713157`, 0.7075757383962846`}, {0.6810394712373629`, 0.9042810359245328`}, {0.578527536404609`, 0.7751236633402536`}, {0.11853707159064841`, 0.5017138784723387`}, {0.05687399238151203`, 0.8564317614786938`}}, Frame -> True] produces two lines which I would like to remove. Thanks, Craig "8.0 for Mac OS X x86 (64-bit) (November 6, 2010)" W Craig Carter Professor of Materials Science, MIT From mathgroup-adm at smc.vnet.net Sat Jul 30 04:16:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3854F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:16:35 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9GVu8029947; Sat, 30 Jul 2011 04:16:36 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 5328EFF006; Sat, 30 Jul 2011 04:16:31 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 94E99A8169; Sat, 30 Jul 2011 04:16:29 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25420 for mathgroup-newout; Sat, 30 Jul 2011 06:02:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25415 for mathgroup-newsend; Sat, 30 Jul 2011 06:02:29 -0400 (EDT) Date: Sat, 30 Jul 2011 06:02:29 -0400 (EDT) Message-Id: <201107301002.GAA25415 at smc.vnet.net> From: Don <donabc at comcast.net> Subject: [mg120598] Pie Chart - Labeled Input To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.90914 I am trying to generalize the following PieChart function where I can programmatically change the number of labeled pieces in the pie. PieChart[{Labeled[1,"label 1","VerticalCallout"],Labeled[2,"label 2","VerticalCallout"],Labeled[3,"label 3","VerticalCallout"]},PlotRange->1.5] For e.g. given the following three lists, how can one form the input that the Pie Chart function above expects? lst1 = {1,2,3} lst2 = {"label 1", "label 2", "label 3"} lst3 = Table["VerticalCallout", {Length[lst1]}] For e.g. if one makes a single list of the three lists above and then tries to map the Labeled function over each element of this single list, a syntax error is generated: (1) singleList = Flatten[#]& /@ Transpose[{lst1, Transpose[{lst2,lst3}]}] (2) Labeled[#]& /@ singleList Mathematica does not like statement 2 because Labeled is expecting more than one input. The obvious direct "solution" above is a loser. Don From mathgroup-adm at smc.vnet.net Sat Jul 30 04:18:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 0FEB36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:18:16 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9IHIl030022; Sat, 30 Jul 2011 04:18:17 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 54E2CFF008; Sat, 30 Jul 2011 04:18:17 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 701EFA80BA; Sat, 30 Jul 2011 04:18:15 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25274 for mathgroup-newout; Sat, 30 Jul 2011 05:58:57 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25270 for mathgroup-newsend; Sat, 30 Jul 2011 05:58:57 -0400 (EDT) Date: Sat, 30 Jul 2011 05:58:57 -0400 (EDT) Message-Id: <201107300958.FAA25270 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120579] Re: FinancialData still broken Reply-To: drmajorbob at yahoo.com References: <201107290841.EAA13363 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.90914 Thanks, but how would I adapt that to get the price of a mutual fund on Feb 10th? Bobby On Fri, 29 Jul 2011 03:41:54 -0500, Chris Degnen <degnen at cwgsy.net> wrote: > DrMajorBob wrote: >> > Armand Tamzarian wrote: >>> >>> Would it be easier to just get the data from Yahoo rather than have to >>> worry about fixes and innoculations? >> >> I don't know how to do that, but I suspect it's Yahoo sending erroneous >> prices, anyway. > > You can get quotes from Yahoo like this: > > quotes = Import[ > "http://download.finance.yahoo.com/d/quote.csv?s=\ > CLU11.NYM+^GSPC+^FTSE&f=abdlohg"]; > (*www.mathematicacookbook.com/downloads/YahooDataDownload.htm*) > TableForm[ > Map[List, MapThread[StringJoin, {{"WTI - ", "S&P - ", "FTSE - "}, > StringReplace[quotes[[All, 4]], {"<b>" -> "", "</b>" -> ""}]}]], > TableHeadings -> {None, {"Last Trade"}}] > > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sat Jul 30 04:20:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D90C36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:20:15 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9KG3L030281; Sat, 30 Jul 2011 04:20:16 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 757F6A8110; Sat, 30 Jul 2011 04:20:16 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id BB044FF006; Sat, 30 Jul 2011 04:20:14 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25325 for mathgroup-newout; Sat, 30 Jul 2011 06:00:04 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25320 for mathgroup-newsend; Sat, 30 Jul 2011 06:00:03 -0400 (EDT) Date: Sat, 30 Jul 2011 06:00:03 -0400 (EDT) Message-Id: <201107301000.GAA25320 at smc.vnet.net> From: "Fabrice P. Laussy" <fabrice.laussy at gmail.com> Subject: [mg120585] Re: Memory leak or flawed garbage collector References: <201107291203.IAA15705 at smc.vnet.net> <4E32E0B4.7060306 at wolfram.com> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.90914 X-PMX-Spam: Gauge=XXXIIIII, Probability=35%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, BODY_PARA_IS_SENTENCE_URL 0.1, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __OEM_PRICE 0, __SANE_MSGID 0, __STOCK_PHRASE_7 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIIII, Probability=35%, DEPRECATED. Use X-PMX-Spam. On Friday, July 29, 2011 06:32:52 pm you wrote: > Essentially impossible to diagnose conclusively without actual code. But > from the ?RegMatrix$632 result above, it appears you use some Module > local symbols to create DownValues. I believe that creates references so > that the ref counting mechanism will not allow freeing them, What I > typically do is explicitly Clear such variables before exiting Module. Dear Daniel, I thought the description would be enough for a guru to identify if this was a bug or some problem from my side. As I said I couldn't reproduce the problem in simplified versions. If you want an instance of the code I can provide it. > There is an example of this at > http://forums.wolfram.com/mathgroup/archive/2010/Jan/msg00155.html however I think for a while you provided enough information hinting that the problem lies on my side. I am calling external modules and this might result in locking variables. I'll study your link & come back here if I can't make sense of it. Thanks for your tips. From mathgroup-adm at smc.vnet.net Sat Jul 30 04:22:16 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 912966BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:22:16 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9MCn6030340; Sat, 30 Jul 2011 04:22:17 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id A59F4FF00A; Sat, 30 Jul 2011 04:22:12 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 9C2C9FF009; Sat, 30 Jul 2011 04:22:10 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25295 for mathgroup-newout; Sat, 30 Jul 2011 05:59:30 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25291 for mathgroup-newsend; Sat, 30 Jul 2011 05:59:30 -0400 (EDT) Date: Sat, 30 Jul 2011 05:59:30 -0400 (EDT) Message-Id: <201107300959.FAA25291 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120582] Re: NIntegrate issue with symbolic parameters References: <201107291201.IAA15650 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.91523 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1100_1199 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You could prevent Mathematica from evaluating Curv in the symbolic stage by only defining your function Curv for numeric arguments, so for example Clear[Curv]; Curv[{a_?NumericQ, b_?NumericQ, c_?NumericQ}] := With[{R = {a, b, c}}, <original definition> ] Flux[0.9] returns 12.5664 Heike. On 29 Jul 2011, at 13:01, gopher wrote: > The docs say that NIntegrate evaluates the integrand with the > variables being symbolic, and then repeatedly evaluates the result > numerically. This is a problem for me as my integrand calls > Eigenvectors which results in a symbolic calculation of the > eigenvectors. If the variables were passed numerically instead, there > would be no problem. > > In the end, I get errors about oscillation and convergence, 'slwcon' > and 'eincr', which should never occur since the integrand is actually > constant! (theoretically and also confirmed by Plot3D). > > Is there a way out? Since the details are a bit long, I am putting a > link to the file below: > > https://netfiles.uiuc.edu/aroy2/www/nintegrate-issue.nb > > Thanks for any help, > Abhishek > From mathgroup-adm at smc.vnet.net Sat Jul 30 04:24:30 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B240D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:24:30 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9OVvu030533; Sat, 30 Jul 2011 04:24:32 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 9801AA8110; Sat, 30 Jul 2011 04:24:31 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id CBB79A80BA; Sat, 30 Jul 2011 04:24:29 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25376 for mathgroup-newout; Sat, 30 Jul 2011 06:01:21 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25371 for mathgroup-newsend; Sat, 30 Jul 2011 06:01:20 -0400 (EDT) Date: Sat, 30 Jul 2011 06:01:20 -0400 (EDT) Message-Id: <201107301001.GAA25371 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120592] Re: CompressedData in Buttons Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.91523 On Fri, 29 Jul 2011 08:02:39 -0400 (EDT), A Retey wrote: > Hi, > >> I have some Buttons that display various data, e.g., area, >> population, density, etc. of U.S. states, and would like to update >> the data. I have only the buttons, not the Input code that produced >> them long ago. Using Show Expression on the button reveals that, >> instead of being in List form, much of the data appears as >> "CompressedData[ ... (gibberish) ...]. >> >> How can I recover the original, uncompressed, data so that I can >> revise it? I found nothing in the Documentation Center or Virtual >> Book, and none of the 74 hits on wolfram.com appear to shed any >> relevant light. >> > I think you will just need to apply Uncompress to the "glibberish", > which should be a string. If you have the CompressedData[..] as an > expression, you can convert the compressed part with: > > CompressedData["..."] /. Verbatim[CompressedData][s_String] :> > Uncompress[s] > > hth, > > albert Actually, the symbol CompressedData is just an alias for Uncompress. So simply evaluating the CompressedData expression in a kernel would work. Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Sat Jul 30 04:26:22 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 3F10C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:26:22 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9QN40031261; Sat, 30 Jul 2011 04:26:23 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 34EB2BF480; Sat, 30 Jul 2011 04:26:23 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 0F3DCBF483; Sat, 30 Jul 2011 04:26:21 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25368 for mathgroup-newout; Sat, 30 Jul 2011 06:01:10 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25363 for mathgroup-newsend; Sat, 30 Jul 2011 06:01:09 -0400 (EDT) Date: Sat, 30 Jul 2011 06:01:09 -0400 (EDT) Message-Id: <201107301001.GAA25363 at smc.vnet.net> From: "McHale, Paul" <Paul.McHale at excelitas.com> Subject: [mg120591] Feature idea (may already be there) To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.91523 I often have trouble viewing large amounts of data. Especially when I want to zoom in on a feature. The only way I know to do it is Manipulate[] or Plot[] with manually chosen limits. Is there another way to pan and zoom on a plot? It would also be great if we could view these settings and pass them to Plot[] as a parameter to achieve similar results in subsequent executions of Plot[]. Of course, this assumes that this would also be applied to ListPlot*, Plot*... Thanks, Paul Paul McHale | Electrical Engineer, Energetics Systems | Excelitas Technologies Corp. Phone: +1 937.865.3004 | Fax: +1 937.865.5170 | Mobile: +1 937.371.2828 1100 Vanguard Blvd, Miamisburg, Ohio 45342-0312 USA Paul.McHale at Excelitas.com<mailto:Paul.McHale at perkinelmer.com> www.excelitas.com<http://www.excelitas.com> [cid:image001.png at 01CB9136.E3D96D90] Please consider the environment before printing this e-mail. This email message and any attachments are confidential and proprietary to Excelitas Technologies Corp. If you are not the intended recipient of this message, please inform the sender by replying to this email or sending a message to the sender and destroy the message and any attachments. Thank you From mathgroup-adm at smc.vnet.net Sat Jul 30 04:28:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 65F566BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:28:21 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9SMGk031397; Sat, 30 Jul 2011 04:28:22 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 71066BF42E; Sat, 30 Jul 2011 04:28:22 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 6A104A80BA; Sat, 30 Jul 2011 04:28:20 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25261 for mathgroup-newout; Sat, 30 Jul 2011 05:58:36 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25256 for mathgroup-newsend; Sat, 30 Jul 2011 05:58:35 -0400 (EDT) Date: Sat, 30 Jul 2011 05:58:35 -0400 (EDT) Message-Id: <201107300958.FAA25256 at smc.vnet.net> From: Andrew Moylan <amoylan at wolfram.com> Subject: [mg120577] Re: NIntegrate issue with symbolic parameters To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.91816 To prevent evaluation until the parameters are numeric, you can add a Condition to the definition for Curv. For example, change Curv[R_] := to Curv[R_] /; VectorQ[R, NumberQ] := Don't forget to Clear[Curv] if you have already given the old definition. Andrew Moylan Wolfram Research ----- Original Message ----- > From: "gopher" <gophergoon at gmail.com> > To: mathgroup at smc.vnet.net > Sent: Friday, July 29, 2011 10:01:55 PM > Subject: NIntegrate issue with symbolic parameters > > The docs say that NIntegrate evaluates the integrand with the > variables being symbolic, and then repeatedly evaluates the result > numerically. This is a problem for me as my integrand calls > Eigenvectors which results in a symbolic calculation of the > eigenvectors. If the variables were passed numerically instead, there > would be no problem. > > In the end, I get errors about oscillation and convergence, 'slwcon' > and 'eincr', which should never occur since the integrand is actually > constant! (theoretically and also confirmed by Plot3D). > > Is there a way out? Since the details are a bit long, I am putting a > link to the file below: > > https://netfiles.uiuc.edu/aroy2/www/nintegrate-issue.nb > > Thanks for any help, > Abhishek > > From mathgroup-adm at smc.vnet.net Sat Jul 30 04:30:13 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 826466BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:30:13 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9UE5V031559; Sat, 30 Jul 2011 04:30:14 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 873C4A8185; Sat, 30 Jul 2011 04:30:14 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A7676A8169; Sat, 30 Jul 2011 04:30:12 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25426 for mathgroup-newout; Sat, 30 Jul 2011 06:02:43 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25421 for mathgroup-newsend; Sat, 30 Jul 2011 06:02:41 -0400 (EDT) Date: Sat, 30 Jul 2011 06:02:41 -0400 (EDT) Message-Id: <201107301002.GAA25421 at smc.vnet.net> From: FranD <seacrofter001 at yahoo.com> Subject: [mg120599] Re: FinancialData still broken To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.91816 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1400_1499 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __INT_PROD_COMP 0, __LINES_OF_YELLING 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. There appears not to be a problem on my computer system. FranD FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX", "JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} $Version Out: {8.71`, 71.23`, 13.66`, 10.64`, 46.6`, 12.42`, 32.1`, 25.99`, 23.37`, 44.88`, 12.38`, 3.09`, 11.06`, 31.03`, 31.69`} {8.71`, 71.23`, 13.66`, 10.64`, 46.6`, 12.42`, 32.1`, 25.99`, 23.37`, 44.88`, 12.38`, 3.09`, 11.06`, 31.03`, 31.69`} "8.0 for Microsoft Windows (32-bit) (February 24, 2011)" > On Jul 21, 5:47 am, DrMajorBob <btre... at austin.rr.com> wrote: >> Erroneous prices are randomly returned: >> >> FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX","JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} >> >> {8.81, 72.4, 14., 10.64, 46.49, 12.48, >> 5.03202*10^8, 26.48, 23.72, 45.35, 12.48, >> 5.03241*10^8, 11.04, 31.44, 32.47} >> >> FinancialData /@ {"ACEIX", "FCNTX", "JACNX", "JANFX", "JANWX","JMSCX", "JNGIX", "JNGLX", "JNMCX", "JNOSX", "JNSGX", "JNSTX", "PTTAX", "RGACX", "STRFX"} >> >> {5.03241*10^8, 72.4, 14., 10.64, 5.03241*10^8, >> 5.03168*10^8, 32.61, 26.48, 23.72, 5.03168*10^8, >> 5.03168*10^8, 3.1, 11.04, 5.03241*10^8, 32.47} >> >> Bobby From mathgroup-adm at smc.vnet.net Sat Jul 30 04:32:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 5CE256BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:32:26 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9WRIh031727; Sat, 30 Jul 2011 04:32:27 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 64336BF47C; Sat, 30 Jul 2011 04:32:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 10034A8195; Sat, 30 Jul 2011 04:32:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25442 for mathgroup-newout; Sat, 30 Jul 2011 06:03:04 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25437 for mathgroup-newsend; Sat, 30 Jul 2011 06:03:03 -0400 (EDT) Date: Sat, 30 Jul 2011 06:03:03 -0400 (EDT) Message-Id: <201107301003.GAA25437 at smc.vnet.net> From: magma <maderri2 at gmail.com> Subject: [mg120601] Re: FinancialData errors References: <201107222344.TAA28525 at smc.vnet.net> <j0u7it$fb7$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.92414 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1500_1599 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, ECARD_KNOWN_DOMAINS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_1 0, __STOCK_PHRASE_6 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. DrMajorBob wrote: > As you see, FinancialData says the price was 10.23. > But I BOUGHT the stock through Janus Funds on that day, and the price was > 10.36. > Moreover, if I go to Yahoo's interactive price chart for the stock at the > following page, 10.36 is the price I find: Pierpaolo Bernardi replied: > Prices do vary continuously, they don't stay the same for a whole day, > At the moment you bought it was 10.36. At the moment the data source > was sampled it was 10.23. Usually historical data use the closing > price, AFAIK. I see nothing strange in this. Bernardi's argument is valid in general, but not in this particular case. It seems that this Janus fund is not traded the whole day long, but that only a closing price is issued every day, and all transactions are executed at that price. The solution to this mysterious price divergence is simple. Check the historical price series in yahoo: http://finance.yahoo.com/q/hp?s=JANFX&a=01&b=05&c11&d=06&e=2= 9&f11&g=d&z=66&y=66 (I hope the link comes out right, anyway check the historical price link on the fund's page in Yahoo finance ) For the date 10 Feb 2011 you will see that the price is indeed 10.36$, but in the rightmost column the ADJUSTED price is 10.23$, the same reported in FinancialData. It seems the the price of this Janus fund is adjusted daily for dividends/distributions and that FinancialData just reports the Adjusted price. So, at least in this case, FinancialData is correct From mathgroup-adm at smc.vnet.net Sat Jul 30 04:34:17 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7E8C06BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:34:17 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9YISK031845; Sat, 30 Jul 2011 04:34:18 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 5C8E7A8110; Sat, 30 Jul 2011 04:34:18 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 70294A80BA; Sat, 30 Jul 2011 04:34:16 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25362 for mathgroup-newout; Sat, 30 Jul 2011 06:00:59 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25357 for mathgroup-newsend; Sat, 30 Jul 2011 06:00:58 -0400 (EDT) Date: Sat, 30 Jul 2011 06:00:58 -0400 (EDT) Message-Id: <201107301000.GAA25357 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120590] Re: Mathematica 8 remote parallel kernels References: <j0truv$d50$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.92414 Perhaps you are exceeding your quota of kernel licences? (Particularly likely on a shared server where others may or may not also be using some of the available licences at any given time.) Another possibility, if you are trying to launch a large number of parallel kernels, is that you are running into some kind of limitation on the number of concurrent TCP/IP connections. Other than that, it is likely platform-dependent, but you do not mention what platform you are using. Correctly setting up Windows client-to-Windows server parallel kernel operation is slightly more difficult than for the other platforms, for example. On Fri, 29 Jul 2011 09:45:19 +0100, Iv=E1n Pulido Sanchez <ijpulido.s at gmail.com> wrote: > Hello, > > When I try to configure remote kernels in Mathematica via > Evaluation>Parallel Kernel Configuration ... then I go to "Remote > Kernels" > and add hosts, after that I try to Launch the remote kernels and only = > some > of them get launched (the number of them varies),and finally I get a msg > like the following. > > KernelObject::rdead: Subkernel connected through remote[nodo2] appears > dead. >>> LinkConnect::linkc: Unable to connect to >>> LinkObject[36154 at 192.168.1.104, > 49648 at 192.168.1.104,38,12]. >> General::stop: Further output of > LinkConnect::linkc will be suppressed during this calculation. >> > > Any ideas how to get this working? > > Take into account it sometimes does load some of the remote kernels but > never all of them. Thanks in advance I hope you can help me with this. From mathgroup-adm at smc.vnet.net Sat Jul 30 04:36:24 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 540F66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:36:24 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9aKYa032001; Sat, 30 Jul 2011 04:36:25 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 87B87A81B0; Sat, 30 Jul 2011 04:36:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 74386A8185; Sat, 30 Jul 2011 04:36:18 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25311 for mathgroup-newout; Sat, 30 Jul 2011 05:59:53 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25306 for mathgroup-newsend; Sat, 30 Jul 2011 05:59:52 -0400 (EDT) Date: Sat, 30 Jul 2011 05:59:52 -0400 (EDT) Message-Id: <201107300959.FAA25306 at smc.vnet.net> From: carlos at colorado.edu Subject: [mg120584] Re: Transforming an expression to publication form References: <201107191057.GAA10297 at smc.vnet.net> <j06auj$nig$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.92414 On Jul 20, 4:33 am, Andrzej Kozlowski <a... at mimuw.edu.pl> wrote: > On 19 Jul 2011, at 11:57, car... at colorado.edu wrote: > > > > > > > Suppose I have the expression > > > C11=A*Em*(4-3*omega^2+nu*(-8+3*omega^2)+(-4+8*nu)*Cos[kappa]); > > > I want to transform this into > > > C11pub=Em*A*(4*(1-2*nu)*(1-Cos[kappa])-3*(1-nu)*omega^2); > > > which is the exactly the way it has to appear in a journal > > publication, > > once mapped to LaTeX. Both C11 and C11pub have the > > same LeafCount (27), and C11 is invariant under Simplify > > and FullSimplify. > > > How do I accomplish C11 -> C11pub within Mathematica, > > without using any extra packages? BTW this is part of one > > of 36 matrix entries, so transforming all by hand takes a while. > > On the one hand: in general, it is not reasonable to expect Mathematica > to do such things. It is not really intended for this purpose and while > one can often succeed by using special tricks, there is no general > approach and I don't think it is worth spending time on uncovering the > tricks needed in an individual case. > > On the other hand, in this particular case it is rather easy to see > these "tricks". Namely: > > C11 = A*Em*(4 - 3*omega^2 + > nu*(-8 + 3*omega^2) + (-4 + 8*nu)*Cos[kappa]) > > Collect[Collect[C11, omega, Factor], {Em, A}] > > A Em (4 (2 nu-1) (cos(kappa)-1)+3 (nu-1) omega^2) > > This is essentially your C11pub except for some signs in a few places. > > Andrzej Kozlowski Many thanks! I had forgotten that Collect can be nested. Related question: once I tried //TraditionalForm//InputForm hoping to get a nicer text to cut and paste in LaTeX. But InputForm regresses to the original unpublishable display, with minus signs in wrong places and superfluous parentheses. Can these filters be nested in some way? From mathgroup-adm at smc.vnet.net Sat Jul 30 04:38:21 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 115016BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:38:21 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9cMuG032072; Sat, 30 Jul 2011 04:38:22 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 11EE7A8185; Sat, 30 Jul 2011 04:38:22 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id EF020FF009; Sat, 30 Jul 2011 04:38:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25356 for mathgroup-newout; Sat, 30 Jul 2011 06:00:48 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25351 for mathgroup-newsend; Sat, 30 Jul 2011 06:00:47 -0400 (EDT) Date: Sat, 30 Jul 2011 06:00:47 -0400 (EDT) Message-Id: <201107301000.GAA25351 at smc.vnet.net> From: "Christoph Lhotka" <christoph.lhotka at univie.ac.at> Subject: [mg120589] Re: Poincare section for double pendulum To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.92717 Hello, this is just a starting point... Try to solve your problem with the method "EventLocator" in NDSolve to limit your output to values on the Poincaré surface of section. You could use e.g. FindInstance to get a good set of initial conditions for given energy value of the Hamiltonian. Good luck, Christoph On 29/07/2011 14:02, gal bevc wrote: > Hello, > > I'm a relatively new user of Mathematica, who doesn't have much of > programming skills. For my undergraduate assingment I must analyze chaotic > motion of double pendulum. > > Until now i have got system of differential equations for equations of > motion for double pendulum(i have x''[t]=function(t) and > y''[t]=function(t)). System of differential equations can be solved for 4 > inital conditions, x[0],y[0],x'[0] and y'[0]. With using function NDSolve i > got functions of angles and angular velocities for upper and lower pendulum > with respect to time, x[t],x'[t],y[t] and y'[t]. > > To get a poincare section of double pendulum, i have to record position of > y[t] and y'[t] whenever x[t] is equal to zero and the velocity of x'[t] is a > positive number. In the end I must get some sort of phase diagram y[t] and > y'[t]. > Because this is a Hamilton non-dissipative system, inital energy of the > system is a constant of time and initial energy is a function of initial > conditions. To get a real poincare diagram i must repeat the procedure > described above for different initial conditions, but for the same energy > level. I need mathematica to use some random numbers for initial conditions > in a way that the initial energy of the system stays the same. So i must > repeat procedure for poincare section(surface of section) for let's say 50 > different initial conditions and then display all results in one y[t],y'[t] > diagram. > Hope that someone can help me. > > Thank you, > Gal Bevc > From mathgroup-adm at smc.vnet.net Sat Jul 30 04:40:27 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 70DDF6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:40:27 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9eSHa032489; Sat, 30 Jul 2011 04:40:28 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 6AB63A8169; Sat, 30 Jul 2011 04:40:28 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 6153CA8195; Sat, 30 Jul 2011 04:40:26 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25475 for mathgroup-newout; Sat, 30 Jul 2011 06:03:48 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25467 for mathgroup-newsend; Sat, 30 Jul 2011 06:03:47 -0400 (EDT) Date: Sat, 30 Jul 2011 06:03:47 -0400 (EDT) Message-Id: <201107301003.GAA25467 at smc.vnet.net> From: James Stein <mathgroup at stein.org> Subject: [mg120605] Re: FinancialData errors References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> <201107290842.EAA13406 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.92717 You purchased shares at 10.36, which WAS the "closing" price for that day. (Note to PierPaolo: Mutual Funds, unlike stocks, do NOT trade DURING the day). The 10.23 price reported by Yahoo is an "adjusted" price. When a fund or stock makes a distribution (typically dividends or capital gains), all historical prices are "adjusted" downward in order that ROI between two dates is consistent. JANFX distributes dividends at the end of every month. Check out this URL: <http://finance.yahoo.com/q/hp?s=JANFX&a=01&b=10&c11&d=02&e&f11&g=d > Note that both "Close" and "Adj Close" are available, and if you check Mathematica's documentation you can learn how to obtain the former. The adjusted prices are the defaults. On Fri, Jul 29, 2011 at 1:42 AM, DrMajorBob <btreat1 at austin.rr.com> wrote: > I've found a new (to me) species of error in FinancialData. > > One example is the price of the following stock on Feb 10, 2011: > > s = "JANFX"; > FinancialData["JANFX", "Name"] > FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] > > "Janus Flexible Bond Fund D Shar" > > {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, > 10.24}} > > As you see, FinancialData says the price was 10.23. > > But I BOUGHT the stock through Janus Funds on that day, and the price was > 10.36. > > Moreover, if I go to Yahoo's interactive price chart for the stock at the > following page, 10.36 is the price I find: > > > http://finance.yahoo.com/echarts?s=JANFX+Interactive#chart3:symbol=janfx;range=ytd;indicator=volume;charttype=line;crosshair=on;ohlcvalues=0;logscale=on;source=undefined > > So... where are the errors really coming from? > > This is not an astronomically large price or a Missing["Not Available"] > price; it's within 2% of the correct price. But it's wrong. > > These errors make it very difficult to trust FinancialData for any useful > purpose. > > Bobby > > -- > DrMajorBob at yahoo.com > > From mathgroup-adm at smc.vnet.net Sat Jul 30 04:40:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8C9906BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:40:55 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9euNY032503; Sat, 30 Jul 2011 04:40:56 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id C4538FF008; Sat, 30 Jul 2011 04:40:56 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 0B02CA80BA; Sat, 30 Jul 2011 04:40:55 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25289 for mathgroup-newout; Sat, 30 Jul 2011 05:59:20 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id FAA25284 for mathgroup-newsend; Sat, 30 Jul 2011 05:59:19 -0400 (EDT) Date: Sat, 30 Jul 2011 05:59:19 -0400 (EDT) Message-Id: <201107300959.FAA25284 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120581] Re: FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.92717 Thank you. I had already seen the page you sent, and had also discovered the following: FinancialData[ "JANFX", #, {{2011, 2, 10}, {2011, 2, 10}}] & /@ {"Close", "High", "Low", "Open", "Price", "Range", "RawClose", "RawHigh", "RawLow", "RawOpen", "RawRange"} {{{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, {10.23, 10.23}}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, {10.36, 10.36}}}} where the "Raw" numbers appear to be what I want. Bobby On Fri, 29 Jul 2011 10:06:18 -0500, James Stein <mathgroup at stein.org> wrote: > You purchased shares at 10.36, which WAS the "closing" price for that > day. > (Note to PierPaolo: Mutual Funds, unlike stocks, do NOT trade DURING the > day). > > The 10.23 price reported by Yahoo is an "adjusted" price. When a fund or > stock makes a distribution (typically dividends or capital gains), all > historical prices are "adjusted" downward in order that ROI between two > dates is consistent. JANFX distributes dividends at the end of every > month. > Check out this URL: > <http://finance.yahoo.com/q/hp?s=JANFX&a=01&b=10&c11&d=02&e&f11&g=d >> > > Note that both "Close" and "Adj Close" are available, and if you check > Mathematica's documentation you can learn how to obtain the former. The > adjusted prices are the defaults. > > On Fri, Jul 29, 2011 at 1:42 AM, DrMajorBob <btreat1 at austin.rr.com> > wrote: > >> I've found a new (to me) species of error in FinancialData. >> >> One example is the price of the following stock on Feb 10, 2011: >> >> s = "JANFX"; >> FinancialData["JANFX", "Name"] >> FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] >> >> "Janus Flexible Bond Fund D Shar" >> >> {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, >> 10.24}} >> >> As you see, FinancialData says the price was 10.23. >> >> But I BOUGHT the stock through Janus Funds on that day, and the price >> was >> 10.36. >> >> Moreover, if I go to Yahoo's interactive price chart for the stock at >> the >> following page, 10.36 is the price I find: >> >> >> http://finance.yahoo.com/echarts?s=JANFX+Interactive#chart3:symbol=janfx;range=ytd;indicator=volume;charttype=line;crosshair=on;ohlcvalues=0;logscale=on;source=undefined >> >> So... where are the errors really coming from? >> >> This is not an astronomically large price or a Missing["Not Available"] >> price; it's within 2% of the correct price. But it's wrong. >> >> These errors make it very difficult to trust FinancialData for any >> useful >> purpose. >> >> Bobby >> >> -- >> DrMajorBob at yahoo.com >> >> -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sat Jul 30 04:42:23 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4118B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:42:23 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9gOIx032592; Sat, 30 Jul 2011 04:42:24 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 85118A8110; Sat, 30 Jul 2011 04:42:24 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 835A4A80BA; Sat, 30 Jul 2011 04:42:22 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25383 for mathgroup-newout; Sat, 30 Jul 2011 06:01:32 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25378 for mathgroup-newsend; Sat, 30 Jul 2011 06:01:31 -0400 (EDT) Date: Sat, 30 Jul 2011 06:01:31 -0400 (EDT) Message-Id: <201107301001.GAA25378 at smc.vnet.net> From: Gary Wardall <gwardall at gmail.com> Subject: [mg120593] Re: Indeterminate result (numerical problem) References: <j0tru0$d4m$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __C230066_P5 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 29, 3:44 am, Sebastian Hofer <sebho... at gmail.com> wrote: > I have a large symbolic expression which is a sum of a large number of fractions, which is the result of an integral. I can get numerical values by NIntegrate, but eventually the expression should go into a minimization problem, which would be much faster starting from an analytic expression. My troubles start even earlier though. When I try to evaluate the expression by > > N[expr/.parameters] > > I get Indeterminate. This is true independently of the precision given to N(machine or arbitrary precision) or the chosen parameters, which I initially chose to be rational numbers from an interval of about 1/10 to 10. Simplifying the symbolic expression is not possible due to its sheer size. Simplifying the separate terms and evaluating them gives me a result, but only if I set $MinPrecision=$MaxPrecision as in > > In[466]:= Block[{prec=MachinePrecision,$MaxPrecision,$MinPrecision},$MaxPrecision=$MinPrecision=prec;N[slist,prec]//Total] > > Out[466]= -0.0000554539 + 0.000957437 I > > where slist contains the simplified and evaluated terms. If I work with arbitrary precision instead I get > > In[462]:= Block[{prec=16,$MaxPrecision,$MinPrecision},$MaxPrecision=$MinPrecision=prec;N[slist,prec]//Total] > > Out[462]= -0.00001695456281093148 + 0.0009204297860912486 I > > The latter result coincides with what I obtain from NIntegrate, which I guess is correct. (Is this a valid assumption?) > However, for different values of prec I get very strange results: > prec=17,18,21: same as prec=16 > prec=19: -0.001922263621488465141 - 0.003379886739497078367 I > prec: Indeterminate > prec=22: -0.0006868461930781501884710 - 0.0006068980872473164707112 I > ... > > What is the best way to approach this problem? How do I know which results I can trust? Is there a better approach to start with? All tips are highly welcome! > Sebastian Sebastian, Without seeing the symbolic expressions you started with it's difficult to fully understand the problem. Gary From mathgroup-adm at smc.vnet.net Sat Jul 30 04:43:04 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C711E6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:43:04 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9h6Gh032671; Sat, 30 Jul 2011 04:43:06 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 1AAB6A8110; Sat, 30 Jul 2011 04:43:06 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 2EADDBF42E; Sat, 30 Jul 2011 04:43:04 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25434 for mathgroup-newout; Sat, 30 Jul 2011 06:02:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25429 for mathgroup-newsend; Sat, 30 Jul 2011 06:02:52 -0400 (EDT) Date: Sat, 30 Jul 2011 06:02:52 -0400 (EDT) Message-Id: <201107301002.GAA25429 at smc.vnet.net> From: Michael Stern <nycstern at gmail.com> Subject: [mg120600] Re: FinancialData errors References: <201107222344.TAA28525 at smc.vnet.net> <201107291202.IAA15679 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_1 0, __STOCK_PHRASE_6 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. 1. JANFX is an open-ended mutual fund, so the price changes only once per day. 2. Per Bloomberg, the proper prices for the days queried were 2/09 10.38 2/10 10.36 2/11 10.37 This agrees with the original poster's experience. 3. FinancialData was returning incorrect results to the original poster. 4. I just ran the original poster's code and it gave me the wrong prices too. It's returning the correct fund name, so this looks like an error in the price database that Wolfram is tapping. 5. On the basis of this example alone, I would not use FinancialData[] for anything, ever. On 7/29/2011 8:02 AM, Pierpaolo Bernardi wrote: > On Fri, Jul 29, 2011 at 10:41, DrMajorBob<btreat1 at austin.rr.com> wrote: >> FUNNY STORY: Here is Tech Support's non-response to my problem, described >> farther down: >> I've found a new (to me) species of error in FinancialData. >> >> One example is the price of the following stock on Feb 10, 2011: >> >> s = "JANFX"; >> FinancialData["JANFX", "Name"] >> FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] >> >> "Janus Flexible Bond Fund D Shar" >> >> {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, >> =C2 =C2 10.24}} >> >> As you see, FinancialData says the price was 10.23. >> >> But I BOUGHT the stock through Janus Funds on that day, and the price was >> 10.36. >> >> Moreover, if I go to Yahoo's interactive price chart for the stock at the >> following page, 10.36 is the price I find: > Prices do vary continuously, they don't stay the same for a whole day, > At the moment you bought it was 10.36. At the moment the data source > was sampled it was 10.23. Usually historical data use the closing > price, AFAIK. I see nothing strange in this. > >> So... where are the errors really coming from? >> >> This is not an astronomically large price or a Missing["Not Available"] >> price; it's within 2% of the correct price. But it's wrong. >> >> These errors make it very difficult to trust FinancialData for any useful >> purpose. > If a difference of less than 2% in the historical market data > influences your algorithms, I won't trust your conclusions. :) > > Cheers > From mathgroup-adm at smc.vnet.net Sat Jul 30 04:43:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AA4E66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:43:26 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9hRZG032688; Sat, 30 Jul 2011 04:43:27 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id E9E64A8169; Sat, 30 Jul 2011 04:43:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 04727BF42E; Sat, 30 Jul 2011 04:43:26 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25406 for mathgroup-newout; Sat, 30 Jul 2011 06:02:08 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25401 for mathgroup-newsend; Sat, 30 Jul 2011 06:02:05 -0400 (EDT) Date: Sat, 30 Jul 2011 06:02:05 -0400 (EDT) Message-Id: <201107301002.GAA25401 at smc.vnet.net> From: JUN <noeckel at gmail.com> Subject: [mg120596] Re: Poincare section for double pendulum References: <j0u7jr$fbg$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93016 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On Jul 29, 5:04 am, gal bevc <gal.b... at gmail.com> wrote: > Hello, > > I'm a relatively new user of Mathematica, who doesn't have much of > programming skills. For my undergraduate assingment I must analyze chaotic > motion of double pendulum. > > Until now i have got system of differential equations for equations of > motion for double pendulum(i have x''[t]=function(t) and > y''[t]=function(t)). System of differential equations can be solved for 4 > inital conditions, x[0],y[0],x'[0] and y'[0]. With using function NDSolvei > got functions of angles and angular velocities for upper and lower pendulum > with respect to time, x[t],x'[t],y[t] and y'[t]. > > To get a poincare section of double pendulum, i have to record position of > y[t] and y'[t] whenever x[t] is equal to zero and the velocity of x'[t] is a > positive number. In the end I must get some sort of phase diagram y[t] and > y'[t]. > Because this is a Hamilton non-dissipative system, inital energy of the > system is a constant of time and initial energy is a function of initial > conditions. To get a real poincare diagram i must repeat the procedure > described above for different initial conditions, but for the same energy > level. I need mathematica to use some random numbers for initial conditions > in a way that the initial energy of the system stays the same. So i must > repeat procedure for poincare section(surface of section) for let's say 50 > different initial conditions and then display all results in one y[t],y'[t] > diagram. > Hope that someone can help me. > > Thank you, > Gal Bevc Hi, one way of doing this is by using StepMonitor during the numerical solution to look for zero-crossings of the variable x[t]: (a) Define an empty list, say zeros = {}; This will be used to collect the zeros in your time interval. (b) Define an auxiliary variable "lastX" and set it equal to the initial value of x (say xInitial), lastX = xInitial; (c) In your NDSolve block, add the following: ...,StepMonitor:>(If[x[t]*lastX<0,AppendTo[zeros,t]];lastX=x[t]) This tests for zero crossings of x[t] between the current time step and the previous one. (d) When NDSolve is done, the list "zeros" contains a set of approximate t values with x[t]=0 that you can then use to refine using FindRoot. Let's say your solution (in the form of rules {x->..., y->...}) is stored in "sol", then say Map[FindRoot[Evaluate[x[t]/.sol],{t,#}]&,zeros] That should give you the values of t at which you would then evaluate y[t] and y'[t] to make the points for the Poincare section. Jens From mathgroup-adm at smc.vnet.net Sat Jul 30 04:44:26 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 80EE46BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:44:26 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9iRFK000338; Sat, 30 Jul 2011 04:44:27 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 84F78BF42E; Sat, 30 Jul 2011 04:44:27 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id A145AA8185; Sat, 30 Jul 2011 04:44:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25398 for mathgroup-newout; Sat, 30 Jul 2011 06:01:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25393 for mathgroup-newsend; Sat, 30 Jul 2011 06:01:53 -0400 (EDT) Date: Sat, 30 Jul 2011 06:01:53 -0400 (EDT) Message-Id: <201107301001.GAA25393 at smc.vnet.net> From: MinHsuan Peng <minhsuanp at wolfram.com> Subject: [mg120595] Re: FinancialData errors References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> <201107290841.EAA13348 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 On Jul 29, 2011, at 3:41 AM, DrMajorBob wrote: > FUNNY STORY: Here is Tech Support's non-response to my problem, described > farther down: > > Hello, > > Thank you for taking the time to send in this report to us. The accuracy > of the financial data depends on how quickly our sources of data provide > updates. A 15 minutes delay on current prices is common. Longer delays are > possible depending on the data. A complete list of the sources queried by > FinancialData is available at: > > http://reference.wolfram.com/mathematica/note/FinancialDataSourceInformation.html > > We are always looking for alternative sources of financial information to > query. If you have any suggestions on alternate sources of information we > should consider, please let us know. > > Sincerely, > > Sean Clarke > > > ========================== ========================== ====================== > > Now, isn't that special? The data is 5 months old, and TS tells me there's > a 15-minute delay? > > ========================== ========================== ====================== > > > I've found a new (to me) species of error in FinancialData. > > One example is the price of the following stock on Feb 10, 2011: > > s = "JANFX"; > FinancialData["JANFX", "Name"] > FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] > > "Janus Flexible Bond Fund D Shar" > > {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, > 10.24}} > > As you see, FinancialData says the price was 10.23. > > But I BOUGHT the stock through Janus Funds on that day, and the price was > 10.36. > > Moreover, if I go to Yahoo's interactive price chart for the stock at the > following page, 10.36 is the price I find: > > http://finance.yahoo.com/echarts?s=JANFX+Interactive#chart3:symbol=janfx;range=ytd;indicator=volume;charttype=line;crosshair=on;ohlcvalues=0;logscale=on;source=undefined > > So... where are the errors really coming from? > The price you bought and shown in yahoo's page was "RawClose" as described in the documentation of FinancialData as a unadjusted price. In[161]:= FinancialData["JANFX","RawClose",{{2011,2,10},{2011,2,10}}] Out[161]= {{{2011,2,10},10.36}} The default query is "Close" which has been adjusted by the dividends and stock splits. MinHsuan > This is not an astronomically large price or a Missing["Not Available"] > price; it's within 2% of the correct price. But it's wrong. > > These errors make it very difficult to trust FinancialData for any useful > purpose. > > Bobby > > -- > DrMajorBob at yahoo.com > From mathgroup-adm at smc.vnet.net Sat Jul 30 04:46:34 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4F1956BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:46:34 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9kZiW000473; Sat, 30 Jul 2011 04:46:35 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 074E2BF47C; Sat, 30 Jul 2011 04:46:35 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id D52D5BF47F; Sat, 30 Jul 2011 04:46:32 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25457 for mathgroup-newout; Sat, 30 Jul 2011 06:03:26 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25452 for mathgroup-newsend; Sat, 30 Jul 2011 06:03:25 -0400 (EDT) Date: Sat, 30 Jul 2011 06:03:25 -0400 (EDT) Message-Id: <201107301003.GAA25452 at smc.vnet.net> From: blamm64 <blamm64 at charter.net> Subject: [mg120603] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text References: <j0oog9$kpr$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 On Jul 27, 6:15 am, John Fultz <jfu... at wolfram.com> wrote: > Looks like there's a minor bug in the updating mechanism. Perhaps this is what you ran into. If, after following my procedure, you save, close, and reopen the notebook, you'll see that the change has taken effect. > > Core.nb is inside the Mathematica layout, but it's generally not a good idea to be changing things there. If you're hoping to make the change globally for all notebooks on your system, let me know and I can walk you through that procedure. However, doing so will not change the notebook when viewed on somebody else's system, where as the Format->Edit Stylesheet... change will persist with the notebook regardless of which system it's viewed on. > > Sincerely, > > John Fultz > jfu... at wolfram.com > User Interface Group > Wolfram Research, Inc. > > > > On Tue, 26 Jul 2011 14:10:44 -0400, Gregory Lypny wrote: > > Hello Mr. Fultz, > > > Tried but it didn't work. I executed the command in the stylesheet > > notebook corresponding to the notebook I'm working with. Perhaps I've > > misunderstood. Also, not sure where to find Core.nb. Is it in the > > application package? > > > Gregory Lypny > > >> On Fri, 22 Jul 2011 19:46:07 -0400 (EDT), Gregory Lypny wrote: > >>> Hi everyone, > > >>> When I include fractions as inline math typesetting, they are scaled > >>> down > >>> to fit the effective line height of the cell. How can I prevent this > >>> or, > >>> I guess, make the line height automatically expand to accommodate the > >>> math? If my regular text in the cell is 12-point times, I'd like all > >>> math variables that are not subscripts or superscripts to be 12-point > >>> as > >>> well. > > >>> Incidentally, other big typeset objects like matrices are not scaled > >>> down, or at least they down't appear to be. > > >>> Sincerely, > > >>> Gregory > > >> If you look in Core.nb, you'll find a style called "InlineCell". This > >> style is > >> automatically applied to all inline cells everywhere. One of the > >> options it has > >> set is: > > >> ScriptLevel->1 > > >> This is what's causing the behavior you're seeing. You can override > >> this with a > >> custom stylesheet. For example, in a given notebook, you can make a > >> private > >> override by doing Format->Edit Stylesheet..., and pasting and > >> interpreting the > >> following cell expression at the end of the resulting stylesheet > >> notebook: > > >> Cell[StyleData["InlineCell"], ScriptLevel->0] > > >> Sincerely, > > >> John Fultz > >> jfu... at wolfram.com > >> User Interface Group > >> Wolfram Research, Inc.- Hide quoted text - > > - Show quoted text - Thanks John! Is there anything similar for Input cells (StandardForm)? Often, I prefer to enter math Input in 2D, and if I enter a 2D Piecewise, and one or more lines of the Piecewise have fractions and/or square roots, the font ends up being really tiny (for me). So some similar setting for Input (StandardForm) to force the font size to be the same regardless of position would be helpful to me. -Brian L. From mathgroup-adm at smc.vnet.net Sat Jul 30 04:47:27 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 076956BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:47:27 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9lS63000505; Sat, 30 Jul 2011 04:47:28 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 1BBCAA8110; Sat, 30 Jul 2011 04:47:28 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id F1DC6BF47F; Sat, 30 Jul 2011 04:47:25 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25463 for mathgroup-newout; Sat, 30 Jul 2011 06:03:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25458 for mathgroup-newsend; Sat, 30 Jul 2011 06:03:36 -0400 (EDT) Date: Sat, 30 Jul 2011 06:03:36 -0400 (EDT) Message-Id: <201107301003.GAA25458 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120604] Re: FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 > Prices do vary continuously, they don't stay the same for a whole day, > At the moment you bought it was 10.36. At the moment the data source > was sampled it was 10.23. Usually historical data use the closing > price, AFAIK. I see nothing strange in this. Nonsense. It's a mutual fund, as you can see from its name. It has one price, exactly once a day. I can look up that price at Yahoo! Finance, and it agrees with what the fund company charged me on that day. Check Feb 10th on the following page: http://finance.yahoo.com/q/hp?s=JANFX&d=6&e=29&f11&g=d&a=1&b=16&c10&z=66&y=66 where open, high, low, and close are all the same -- namely, $10.36. I JUST noticed the last column on that page says the "adjusted" close was $10.23, and that's what FinancialData returned -- part of a possible explanation -- but: a) There was no dividend or split on that day or any day nearby, b) NONE of the numbers in that column make any sense, c) For most days and/or most funds, FinancialData returns the unadjusted close, so there's no consistency, and d) I want the price I paid, not an "adjusted" number, even if it made sense. > If a difference of less than 2% in the historical market data > influences your algorithms, I won't trust your conclusions. :) I want to input the dollars I contributed and compute the shares I bought, to the same 3 to 4 digits that the fund companies compute it, in order to simplify "buy" and "sell" functions -- to save me time when entering trades. 2% is far too much error to do that. Ending with the wrong number of shares in my account -- because of days when the price comes back wrong from FinancialData -- is unacceptable. It makes the share and dollar balance wrong, the internal rate of return wrong, etc. I'm contributing $100 to my IRA 60 times a year, plus occasional transfers among the funds I hold, so simpler "buy" and "sell" functions seem worthwhile, if it were possible... which, with these errors, it is not. And regardless, whether I need perfection or not, the "curated" data is simply wrong. Bobby On Fri, 29 Jul 2011 03:48:42 -0500, Pierpaolo Bernardi <olopierpa at gmail.com> wrote: > On Fri, Jul 29, 2011 at 10:41, DrMajorBob <btreat1 at austin.rr.com> wrote: >> FUNNY STORY: Here is Tech Support's non-response to my problem, >> described >> farther down: > >> I've found a new (to me) species of error in FinancialData. >> >> One example is the price of the following stock on Feb 10, 2011: >> >> s = "JANFX"; >> FinancialData["JANFX", "Name"] >> FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] >> >> "Janus Flexible Bond Fund D Shar" >> >> {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, >> 10.24}} >> >> As you see, FinancialData says the price was 10.23. >> >> But I BOUGHT the stock through Janus Funds on that day, and the price >> was >> 10.36. >> >> Moreover, if I go to Yahoo's interactive price chart for the stock at >> the >> following page, 10.36 is the price I find: > > Prices do vary continuously, they don't stay the same for a whole day, > At the moment you bought it was 10.36. At the moment the data source > was sampled it was 10.23. Usually historical data use the closing > price, AFAIK. I see nothing strange in this. > >> So... where are the errors really coming from? >> >> This is not an astronomically large price or a Missing["Not Available"] >> price; it's within 2% of the correct price. But it's wrong. >> >> These errors make it very difficult to trust FinancialData for any >> useful >> purpose. > > If a difference of less than 2% in the historical market data > influences your algorithms, I won't trust your conclusions. :) > > Cheers -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sat Jul 30 04:48:33 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EA28B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:48:32 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9mYAY000652; Sat, 30 Jul 2011 04:48:34 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 04B7DBF42E; Sat, 30 Jul 2011 04:48:34 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 52695A8169; Sat, 30 Jul 2011 04:48:32 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25348 for mathgroup-newout; Sat, 30 Jul 2011 06:00:38 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25343 for mathgroup-newsend; Sat, 30 Jul 2011 06:00:36 -0400 (EDT) Date: Sat, 30 Jul 2011 06:00:36 -0400 (EDT) Message-Id: <201107301000.GAA25343 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120588] Re: Memory leak or flawed garbage collector References: <j0u7mo$fc1$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 Dear Fabrice Mathematica's garbage collection is based on reference counting. Thus, if one creates a reference to a Temporary symbol, whether directly or indirectly, the symbol cannot be garbage-collected until the reference is removed. Here is an example: In[1] := Module[{a}, a] Out[1] = a$592 In[2] := Names["Global`*"] Out[2] = {a, a$592} Thus we see that the symbol Out has a DownValue (i.e. Out[1]) which references the internal symbol a$592. This reference is counted and thus prevents garbage collection. To clear it up we may do the following: In[3] := Unprotect[Out]; Clear[Out]; Protect[Out]; In[6] := Names["Global`*"] Out[6] = {a} Of course, it is quite possible that the references to your symbols responsible for their not being garbage-collected are somewhere other than the DownValues of In or Out, but if you find and remove these, you should find that the symbols are garbage-collected (unless for some reason they have had their Temporary attribute removed during the course of execution). If this does not occur after all references have been removed, then indeed a bug in the garbage collector would indeed be a possibility. (It is conceivable that references are not counted immediately, as would be the case in a mark-sweep garbage collector, but as far as I know such mechanisms are not in fact employed as far as the interpreter is concerned; they would likely be rather difficult to implement in a term-rewriting language such as Mathematica.) Best, O. R. On Fri, 29 Jul 2011 13:05:44 +0100, Fabrice P. Laussy <fabrice.laussy at gmail.com> wrote: > Dear Group, > > I have a problem of garbage collection or of memory leak, with a > module that will seemingly not discard its internal variables, thus > leading to explosion of memory usage by repeated calls to this module. > > Opening the notebook, nothing else being done yet: > > In[1]:= MemoryInUse[] > Out[1]= 18460176 > > Then I define the said module, with private variables, etc. Before > running the first instance of it, already there appears many > variables, some defined globally, others with the $ of internal > variables: > > ?Global`* > > Global` > <many symbols> > > After running the first instance of the module: > > In[32]:= MemoryInUse[] > Out[32]= 26536288 > > After running the second instance: > > In[35]:= MemoryInUse[] > Out[35]= 32878688 > > Etc., the memory will keep increasing, although each module runs a > separate case and could be computed in separate notebooks, thus the > amount of required memory should be the same. > > The variables indeed keep cluttering things from the various instances > of the module: > > ?Global`* > > Global` > <more symbols> > > Now, if we take for instance, RegMatrix$632, which appears in the list > above. It seems to take no memory: > > In[39]:= ByteCount[RegMatrix$632] > Out[39]= 0 > > But it clearly is stored in memory: > > ?RegMatrix$632 > Global`RegMatrix$632 > Attributes[RegMatrix$632]={Temporary} > > RegMatrix$632[{0,0,0,0,0,0,0,0},{-1,-1,0,0,0,0,0,0}]=0. > RegMatrix$632[{0,0,0,0,0,0,0,0},{-1,0,0,0,0,0,1,0}]=0 > RegMatrix$632[{0,0,0,0,0,0,0,0},{-1,0,0,0,1,0,0,0}]=0 > > [snip] > > (a lot of more stuff here), and if I remove it: > > In[47]:= MemoryInUse[] > Out[47]= 32879624 > > In[48]:= Remove[RegMatrix$632] > > In[49]:= MemoryInUse[] > Out[49]= 29521760 > > So clearly, along with all the other stuff lying around, it accounts > for this filling up of the memory. It seems there is a problem with > garbage collection and disposing of local variables defined within a > module. > > I don't think there is anything special with the module itself. It > calls other modules defined externally. At the same time the problem > does not seem reproducible defining a toy-module and looking for the > same behaviour. Does this problem seem familiar? Strange? What could > be causing it? From mathgroup-adm at smc.vnet.net Sat Jul 30 04:50:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EE3956BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 04:50:34 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6U9oVxW000824; Sat, 30 Jul 2011 04:50:36 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id B25E1BF482; Sat, 30 Jul 2011 04:50:30 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 9B9F8BF47F; Sat, 30 Jul 2011 04:50:28 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25414 for mathgroup-newout; Sat, 30 Jul 2011 06:02:18 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id GAA25409 for mathgroup-newsend; Sat, 30 Jul 2011 06:02:17 -0400 (EDT) Date: Sat, 30 Jul 2011 06:02:17 -0400 (EDT) Message-Id: <201107301002.GAA25409 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120597] Re: FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0fos4$8p6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.93615 > The default query is "Close" which has been adjusted by the dividends > and stock splits. Adjusted in what sense? Over what relevant time period? In the following, there are no splits or dividends in the time period requested: FinancialData[ "JANFX", #, {{2011, 2, 10}, {2011, 2, 10}}] & /@ {"Close", "High", "Low", "Open", "Price", "Range", "RawClose", "RawHigh", "RawLow", "RawOpen", "RawRange"} {{{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, 10.23}}, {{{2011, 2, 10}, {10.23, 10.23}}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, 10.36}}, {{{2011, 2, 10}, {10.36, 10.36}}}} Does this "adjusted" price depend on splits and dividends from Feb 10th until NOW? If so, what good is that for analysis over a different time frame? And if so, shouldn't the following plot be monotone? GatherBy[Flatten[ FinancialData["JANFX", #, {2011, 2, 10}] & /@ {"Close", "RawClose"}, 1], First] /. {{dt_, adjusted_}, {dt_, raw_}} :> {dt, raw - adjusted} // DateListPlot Bobby On Fri, 29 Jul 2011 16:52:30 -0500, MinHsuan Peng <minhsuanp at wolfram.com> wrote: > > On Jul 29, 2011, at 3:41 AM, DrMajorBob wrote: > >> FUNNY STORY: Here is Tech Support's non-response to my problem, >> described >> farther down: >> >> Hello, >> >> Thank you for taking the time to send in this report to us. The >> accuracy >> of the financial data depends on how quickly our sources of data >> provide >> updates. A 15 minutes delay on current prices is common. Longer delays >> are >> possible depending on the data. A complete list of the sources queried >> by >> FinancialData is available at: >> >> http://reference.wolfram.com/mathematica/note/FinancialDataSourceInformatio >> n.html >> >> We are always looking for alternative sources of financial information >> to >> query. If you have any suggestions on alternate sources of information >> we >> should consider, please let us know. >> >> Sincerely, >> >> Sean Clarke >> >> >> ======================================================================== >> >> Now, isn't that special? The data is 5 months old, and TS tells me >> there's >> a 15-minute delay? >> >> ======================================================================== >> >> >> I've found a new (to me) species of error in FinancialData. >> >> One example is the price of the following stock on Feb 10, 2011: >> >> s = "JANFX"; >> FinancialData["JANFX", "Name"] >> FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] >> >> "Janus Flexible Bond Fund D Shar" >> >> {{{2011, 2, 9}, 10.25}, {{2011, 2, 10}, 10.23}, {{2011, 2, 11}, >> 10.24}} >> >> As you see, FinancialData says the price was 10.23. >> >> But I BOUGHT the stock through Janus Funds on that day, and the price >> was >> 10.36. >> >> Moreover, if I go to Yahoo's interactive price chart for the stock at >> the >> following page, 10.36 is the price I find: >> >> http://finance.yahoo.com/echarts?s=JANFX+Interactive#chart3:symbol=janfx;range=ytd;indicator=volume;charttype=line;crosshair=on;ohlcvalues=0;logscale=on;source=undefined >> >> So... where are the errors really coming from? >> > > > The price you bought and shown in yahoo's page was "RawClose" as > described in the documentation of FinancialData as a unadjusted price. > > In[161]:= FinancialData["JANFX","RawClose",{{2011,2,10},{2011,2,10}}] > Out[161]= {{{2011,2,10},10.36}} > > The default query is "Close" which has been adjusted by the dividends > and stock splits. > > MinHsuan > >> This is not an astronomically large price or a Missing["Not Available"] >> price; it's within 2% of the correct price. But it's wrong. >> >> These errors make it very difficult to trust FinancialData for any >> useful >> purpose. >> >> Bobby >> >> -- >> DrMajorBob at yahoo.com >> > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sat Jul 30 05:24:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 20D006BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 05:24:46 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6UAOlZj005815; Sat, 30 Jul 2011 05:24:47 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 40271A81B0; Sat, 30 Jul 2011 05:24:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 683E1A8195; Sat, 30 Jul 2011 05:24:45 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA26450 for mathgroup-newout; Sat, 30 Jul 2011 07:19:50 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA26444 for mathgroup-newsend; Sat, 30 Jul 2011 07:19:49 -0400 (EDT) Date: Sat, 30 Jul 2011 07:19:49 -0400 (EDT) Message-Id: <201107301119.HAA26444 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120606] Re: [Mathematica] special iterator References: <201107300958.FAA25264 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.101516 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_600_699 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. With a number of functions such as Do and Table, you can specify the iteration range in the form {i, {i1,i2,=85}}, so to iterate over all indices except j you could do something like Do[ <something>, {i, Drop[Range[Length[myList]], {j}]} Heike On 30 Jul 2011, at 10:58, lorenzo wrote: > Hello everybody, > > I would like to define an iterator to explore all the elements in a list except for the one of index j. > > something like: > {index,0,Length[myList]} and if index == j ---> index++ > > Is it possible? > Can I do this without deleting the j-th element? > > Thank you very much for helping :) > From mathgroup-adm at smc.vnet.net Sat Jul 30 05:26:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E124F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 05:26:19 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6UAQLcp006657; Sat, 30 Jul 2011 05:26:21 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 253F7BF42E; Sat, 30 Jul 2011 05:26:21 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 60ECBA8110; Sat, 30 Jul 2011 05:26:19 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA26469 for mathgroup-newout; Sat, 30 Jul 2011 07:20:01 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA26461 for mathgroup-newsend; Sat, 30 Jul 2011 07:20:01 -0400 (EDT) Date: Sat, 30 Jul 2011 07:20:01 -0400 (EDT) Message-Id: <201107301120.HAA26461 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120607] Re: extra lines in framed plots? References: <201107301000.GAA25337 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.101814 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Have you tried setting Axes->False? Heike On 30 Jul 2011, at 11:00, W Craig Carter wrote: > Hello, > Does anybody know how to remove the "guide lines" in framed plots. > > When I do this: > ListPlot[{{0.1, 0.2}, {0.5, 0.5}, {0.8, 0.9}}, Frame -> True] > > I get no extra vertical and horizontal lines. > > But, this: > ListPlot[ > {{0.4289099257180531`, > 0.5537224743099745`}, {0.7079331672754348`, > 0.0798617987377328`}, {0.7626789940630332`, > 0.09782702610262328`}, {0.26298609181891597`, > 0.23650806653149004`}, {0.9806031473561678`, > 0.6881903807736833`}, {0.9182772394713157`, > 0.7075757383962846`}, {0.6810394712373629`, > 0.9042810359245328`}, {0.578527536404609`, > 0.7751236633402536`}, {0.11853707159064841`, > 0.5017138784723387`}, {0.05687399238151203`, 0.8564317614786938`}}, > Frame -> True] > > produces two lines which I would like to remove. > > Thanks, Craig > > > "8.0 for Mac OS X x86 (64-bit) (November 6, 2010)" > > W Craig Carter > Professor of Materials Science, MIT > > > > From mathgroup-adm at smc.vnet.net Sat Jul 30 05:28:14 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 45C206BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sat, 30 Jul 2011 05:28:14 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6UASFha006781; Sat, 30 Jul 2011 05:28:15 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 906E9A8169; Sat, 30 Jul 2011 05:28:15 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 76692A8110; Sat, 30 Jul 2011 05:28:13 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA26475 for mathgroup-newout; Sat, 30 Jul 2011 07:20:12 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA26470 for mathgroup-newsend; Sat, 30 Jul 2011 07:20:11 -0400 (EDT) Date: Sat, 30 Jul 2011 07:20:11 -0400 (EDT) Message-Id: <201107301120.HAA26470 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120608] Re: Pie Chart - Labeled Input References: <201107301002.GAA25415 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.30.101814 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1200_1299 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. You could use Apply instead of Map, i.e. PieChart[Labeled[##] & @@@ Transpose[{lst1, lst2, lst3}]] or alternatively using MapThread: PieChart[MapThread[Labeled[##] &, {lst1, lst2, lst3}]] Heike On 30 Jul 2011, at 11:02, Don wrote: > I am trying to generalize the following > PieChart function where I can programmatically > change the number of labeled pieces in the pie. > > PieChart[{Labeled[1,"label 1","VerticalCallout"],Labeled[2,"label > 2","VerticalCallout"],Labeled[3,"label > 3","VerticalCallout"]},PlotRange->1.5] > > For e.g. given the following three lists, how can one form the input > that the Pie Chart function above expects? > > lst1 = {1,2,3} > lst2 = {"label 1", "label 2", "label 3"} > lst3 = Table["VerticalCallout", {Length[lst1]}] > > For e.g. if one makes a single list of the three lists above > and then tries to map the Labeled function over each > element of this single list, a syntax error is generated: > > (1) singleList = Flatten[#]& /@ Transpose[{lst1, > Transpose[{lst2,lst3}]}] > > (2) Labeled[#]& /@ singleList > > Mathematica does not like statement 2 because Labeled is expecting > more than one input. The obvious direct "solution" above is a > loser. > > Don > From mathgroup-adm at smc.vnet.net Sun Jul 31 05:32:18 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C1D1C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:32:17 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAWIUp022908; Sun, 31 Jul 2011 05:32:19 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id BF1C5FF006; Sun, 31 Jul 2011 05:32:18 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C43C5A815B; Sun, 31 Jul 2011 05:32:11 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05174 for mathgroup-newout; Sun, 31 Jul 2011 07:25:09 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05169 for mathgroup-newsend; Sun, 31 Jul 2011 07:25:07 -0400 (EDT) Date: Sun, 31 Jul 2011 07:25:07 -0400 (EDT) Message-Id: <201107311125.HAA05169 at smc.vnet.net> From: ace55555 <yeivanye at gmail.com> Subject: [mg120613] Multiple Styles To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.101814 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_500_599 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. I am trying to change both the thickness and color of four parametric curves using PlotStyle. However, I either get the thickness or the colors to work but not both. I tried two different lines of code at the end of ParametricPlot3D: ..,PlotStyle -> {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]}},PlotStyle -> {Thickness[0.01]} ..,PlotStyle -> {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]},{Thickness[0.01]}} It would be deeply appreciated if someone could help me on this matter. Thanks. From mathgroup-adm at smc.vnet.net Sun Jul 31 05:35:09 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id B7C556BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:35:08 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAZAK2023958; Sun, 31 Jul 2011 05:35:10 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 0A6AEBF417; Sun, 31 Jul 2011 05:35:10 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 626F6A8170; Sun, 31 Jul 2011 05:35:08 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05206 for mathgroup-newout; Sun, 31 Jul 2011 07:25:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05201 for mathgroup-newsend; Sun, 31 Jul 2011 07:25:53 -0400 (EDT) Date: Sun, 31 Jul 2011 07:25:53 -0400 (EDT) Message-Id: <201107311125.HAA05201 at smc.vnet.net> From: a boy <avvboy at gmail.com> Subject: [mg120617] The Largest subscript-known prime number Prime[n] To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.102119 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_300_399 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. What number is the Largest subscript-known prime number Prime[n].until now? In[1]:= Prime[10^13] During evaluation of In[1]:= Prime::largp: Argument 10000000000000 in Prime[10000000000000] is too large for this implementation. >> Out[1]= Prime[10000000000000] Prime[10^12]= 29996224275833 How powerful CPU&Mem can solve Prime[10^13] in about one day time? From mathgroup-adm at smc.vnet.net Sun Jul 31 05:35:33 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8DA5C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:35:33 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAZYXG023984; Sun, 31 Jul 2011 05:35:34 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 56B17A81AA; Sun, 31 Jul 2011 05:35:34 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 2994CBF417; Sun, 31 Jul 2011 05:35:32 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05146 for mathgroup-newout; Sun, 31 Jul 2011 07:24:35 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05142 for mathgroup-newsend; Sun, 31 Jul 2011 07:24:34 -0400 (EDT) Date: Sun, 31 Jul 2011 07:24:34 -0400 (EDT) Message-Id: <201107311124.HAA05142 at smc.vnet.net> From: "andre.robin3" <andre.robin3 at wanadoo.fr> Subject: [mg120610] Re: [Mathematica] special iterator References: <j10kmc$omh$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.102119 If you use the iterator in a Table[...], and you can do something like this : Table[i, { f[i] , DeleteCases[Range[10], 3 | 4}] ---> {f[1], f[2], f[5], f[6], f[7], f[8], f[9], f[10]} mathematica 7 see the doc of Table[ ] : "Table[exp,{i,{i1,i2,...}}] uses the successives values i1,i2,... ." I think It doesn't work on too old versions of mathematica (<5 ? ) "lorenzo" <lorenzo_ktm at yahoo.it> a écrit dans le message de news: j10kmc$omh$1 at smc.vnet.net... > Hello everybody, > > I would like to define an iterator to explore all the elements in a list > except for the one of index j. > > something like: > {index,0,Length[myList]} and if index == j ---> index++ > > Is it possible? > Can I do this without deleting the j-th element? > > Thank you very much for helping :) > From mathgroup-adm at smc.vnet.net Sun Jul 31 05:35:36 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A1E3A6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:35:35 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAZaJr023991; Sun, 31 Jul 2011 05:35:36 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id DD4A3BF417; Sun, 31 Jul 2011 05:35:36 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id C86FAA81C7; Sun, 31 Jul 2011 05:35:34 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05262 for mathgroup-newout; Sun, 31 Jul 2011 07:27:22 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05257 for mathgroup-newsend; Sun, 31 Jul 2011 07:27:22 -0400 (EDT) Date: Sun, 31 Jul 2011 07:27:22 -0400 (EDT) Message-Id: <201107311127.HAA05257 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120625] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.102119 [Fixing an error to my last email. -jf] On Sat, 30 Jul 2011 13:16:47 -0500, John Fultz wrote: > Devising a solution for this was slightly tricky, as I wanted to preserve > shrinking behavior, but not for top-level fractions. Here's what I came > up with: > > Cell[StyleData["Piecewise"], > FractionBoxOptions->{BaseStyle->{ScriptLevel->1}}] Sorry, that should have been... Cell[StyleData["Piecewise"], FractionBoxOptions->{BaseStyle->{ScriptLevel->0}}] Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Sun Jul 31 05:38:51 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9EDE16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:38:51 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAcqZq024162; Sun, 31 Jul 2011 05:38:52 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 7B2C7A81A1; Sun, 31 Jul 2011 05:38:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id BB8B8BF480; Sun, 31 Jul 2011 05:38:49 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05190 for mathgroup-newout; Sun, 31 Jul 2011 07:25:31 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05185 for mathgroup-newsend; Sun, 31 Jul 2011 07:25:30 -0400 (EDT) Date: Sun, 31 Jul 2011 07:25:30 -0400 (EDT) Message-Id: <201107311125.HAA05185 at smc.vnet.net> From: "Scot T. Martin" <smartin at seas.harvard.edu> Subject: [mg120615] Re: special iterator References: <201107300958.FAA25264 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.102714 Table allows this syntax: Table[expr, {i, {j1,j2,...}} ] uses the successive values j1,j2, ... . So, far your problem, do something like Table[expr {i, Delete[Range[1,Length@myList],j] }. ________________________________________ From: lorenzo [lorenzo_ktm at yahoo.it] Sent: Saturday, July 30, 2011 05:58 To: mathgroup at smc.vnet.net Subject: [mg120615] special iterator Hello everybody, I would like to define an iterator to explore all the elements in a list ex= cept for the one of index j. something like: {index,0,Length[myList]} and if index == j ---> index++ Is it possible? Can I do this without deleting the j-th element? Thank you very much for helping :) From mathgroup-adm at smc.vnet.net Sun Jul 31 05:39:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id EFDA56BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:39:54 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAduDT024201; Sun, 31 Jul 2011 05:39:56 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id D2792A8169; Sun, 31 Jul 2011 05:39:55 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id E49BFA815B; Sun, 31 Jul 2011 05:39:53 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05234 for mathgroup-newout; Sun, 31 Jul 2011 07:26:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05229 for mathgroup-newsend; Sun, 31 Jul 2011 07:26:37 -0400 (EDT) Date: Sun, 31 Jul 2011 07:26:37 -0400 (EDT) Message-Id: <201107311126.HAA05229 at smc.vnet.net> From: Brett Champion <brettc at wolfram.com> Subject: [mg120621] Re: Pie Chart - Labeled Input References: <201107301002.GAA25415 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.102714 On Jul 30, 2011, at 5:02 AM, Don wrote: > I am trying to generalize the following > PieChart function where I can programmatically > change the number of labeled pieces in the pie. > > PieChart[{Labeled[1,"label 1","VerticalCallout"],Labeled[2,"label > 2","VerticalCallout"],Labeled[3,"label > 3","VerticalCallout"]},PlotRange->1.5] > > For e.g. given the following three lists, how can one form the input > that the Pie Chart function above expects? > > lst1 = {1,2,3} > lst2 = {"label 1", "label 2", "label 3"} > lst3 = Table["VerticalCallout", {Length[lst1]}] > The easiest way in this case is to use the ChartLabels option: PieChart[lst1, ChartLabels -> Placed[lst2, "VerticalCallout"]] Brett From mathgroup-adm at smc.vnet.net Sun Jul 31 05:43:02 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 671F16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:43:02 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAgwj2024452; Sun, 31 Jul 2011 05:43:03 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 1CA4CBF417; Sun, 31 Jul 2011 05:42:58 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 0563DA8169; Sun, 31 Jul 2011 05:42:56 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05228 for mathgroup-newout; Sun, 31 Jul 2011 07:26:26 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05223 for mathgroup-newsend; Sun, 31 Jul 2011 07:26:26 -0400 (EDT) Date: Sun, 31 Jul 2011 07:26:26 -0400 (EDT) Message-Id: <201107311126.HAA05223 at smc.vnet.net> From: "Scott Blomquist (sblom)" <scott at blomqui.st> Subject: [mg120620] Doesn't work in Mathematica 8 To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.103014 An equation for plotting a Batman symbol has been making the rounds on the internet. I figured it'd be fun to reproduce the originator's result for myself in Mathematica 8, so I carefully typed it in and tried a ContourPlot[batman[x,y]==0,{x,-8,8},{y,-4,4}]. It didn't work. I broke it down into constituent pieces and plotted each of the topmost () sections by itself. Most of them work as expected, but a few of them don't. Reports from those with access to older versions of Mathematica indicate some luck getting the equation to work with ImplicitPlot: http://www.reddit.com/r/pics/comments/j2qjc/do_you_like_batman_do_you_like_math_my_math/c28ozge Do any of you have any tips for fixing my attempt to ContourPlot this? Any ideas why this is working with older versions of Mathematica but not the latest one? From mathgroup-adm at smc.vnet.net Sun Jul 31 05:43:42 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 341DA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:43:42 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAhhBt024503; Sun, 31 Jul 2011 05:43:43 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id E94F8BF483; Sun, 31 Jul 2011 05:43:42 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 03AC5BF480; Sun, 31 Jul 2011 05:43:41 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05277 for mathgroup-newout; Sun, 31 Jul 2011 07:27:44 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05272 for mathgroup-newsend; Sun, 31 Jul 2011 07:27:43 -0400 (EDT) Date: Sun, 31 Jul 2011 07:27:43 -0400 (EDT) Message-Id: <201107311127.HAA05272 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120627] Re: special iterator Reply-To: drmajorbob at yahoo.com References: <201107300958.FAA25264 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.103014 If "explore" means "Print", it could be list = Range[10]; j = 4; MapIndexed[#2 != {j} && Print@# &, list]; 1 2 3 5 6 7 8 9 10 or Scan[Print, Delete[list, j]] 1 2 3 5 6 7 8 9 10 I can think of no functional solution that doesn't produce (and discard) an extraneous list of length n or n-1, where n is Length@list. Bobby On Sat, 30 Jul 2011 04:58:46 -0500, lorenzo <lorenzo_ktm at yahoo.it> wrote: > Hello everybody, > > I would like to define an iterator to explore all the elements in a list > except for the one of index j. > > something like: > {index,0,Length[myList]} and if index == j ---> index++ > > Is it possible? > Can I do this without deleting the j-th element? > > Thank you very much for helping :) > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sun Jul 31 05:46:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E24C66BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:46:45 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAkigb024868; Sun, 31 Jul 2011 05:46:45 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id D3F61BF480; Sun, 31 Jul 2011 05:46:44 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 19D4CBF483; Sun, 31 Jul 2011 05:46:43 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05248 for mathgroup-newout; Sun, 31 Jul 2011 07:27:00 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05243 for mathgroup-newsend; Sun, 31 Jul 2011 07:26:59 -0400 (EDT) Date: Sun, 31 Jul 2011 07:26:59 -0400 (EDT) Message-Id: <201107311126.HAA05243 at smc.vnet.net> From: Bill Rowe <readnews at sbcglobal.net> Subject: [mg120623] Re: Is it possible to delete "context" from the list of loaded Contexts[]? To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.103014 On 7/29/11 at 8:02 AM, lehin.p at gmail.com (Alexey Popkov) wrote: >We can remove all symbols in a particular context by using >Remove["context`*"]. But is it possible to remove "context`" itself >from the system so that it will no longer be listed in Contexts[]? Yes. The simplest way to do this would be to load the package CleanSlate before defining the context you want to remove. That is doing: <<Utilities`CleanSlate` followed by CleanSlate[] will remove everything defined after CleanSlate was loaded. Or if you just want to remove one context CleanSlate["context`"] will do that. The file CleanSlate.m can be found at ToFileName[{$InstallationDirectory,"AddOns","ExtraPackages","Utilities"}] That file is well commented to describe how CleanSlate works. If the functions provided aren't what you need, it should form a good basis for creating your own solution. From mathgroup-adm at smc.vnet.net Sun Jul 31 05:47:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 442186BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:47:55 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAluHx024932; Sun, 31 Jul 2011 05:47:56 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 73BFEA8169; Sun, 31 Jul 2011 05:47:56 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 50191A815B; Sun, 31 Jul 2011 05:47:54 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05212 for mathgroup-newout; Sun, 31 Jul 2011 07:26:04 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05207 for mathgroup-newsend; Sun, 31 Jul 2011 07:26:04 -0400 (EDT) Date: Sun, 31 Jul 2011 07:26:04 -0400 (EDT) Message-Id: <201107311126.HAA05207 at smc.vnet.net> From: a boy <avvboy at gmail.com> Subject: [mg120618] In Version 8, Combinatorial&GraphTheory functions confuse me completely To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.103915 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_900_999 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. 1. Mathematica8 says Combinatorica Graph and Permutations functionality has been superseded by preloaded functionaliy. But " preloaded functionaliy" seems to be not completed yet. There are only a few "preloaded functionaliy". At now, how to use Combinatorica & GraphUtilities package? << Combinatorica` Needs["GraphUtilities`"] ModMatrix[n_, list_] := Table[If[MemberQ[list, Mod[j - i, n]], 1, 0], {i, 1, n}, {j, 1, n}] QuadraticModMatrix[n1_, list1_, n2_, list2_] := ModMatrix[n1, list1] + ArrayPad[ModMatrix[n2, list2], {0, n1 - n2}] General::compat: Combinatorica Graph and Permutations functionality has been superseded by preloaded functionaliy. The package now being loaded may conflict with this. Please see the Compatibility Guide for details. 2. Both GraphPlot[g] and ShowGraph[g] doesn't work! How to plot these Graphs as below? In[71]:= n = 1; While[n++ < 10, g = Graph[Table[i \[UndirectedEdge] Mod[i + 1, 2], {i, 20}]] ]; g From mathgroup-adm at smc.vnet.net Sun Jul 31 05:50:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 230256BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:50:35 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAoapU025136; Sun, 31 Jul 2011 05:50:36 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 5D296FF006; Sun, 31 Jul 2011 05:50:36 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 06C41A8169; Sun, 31 Jul 2011 05:50:33 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05179 for mathgroup-newout; Sun, 31 Jul 2011 07:25:19 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05175 for mathgroup-newsend; Sun, 31 Jul 2011 07:25:19 -0400 (EDT) Date: Sun, 31 Jul 2011 07:25:19 -0400 (EDT) Message-Id: <201107311125.HAA05175 at smc.vnet.net> From: "Alexey Popkov" <lehin.p at gmail.com> Subject: [mg120614] Re: Memory leak or flawed garbage collector References: <j0u7mo$fc1$1 at smc.vnet.net> <j10l01$os6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.103915 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, BODY_PARA_IS_SENTENCE_URL 0.1, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1200_1299 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __OEM_PRICE 0, __SANE_MSGID 0, __STOCK_PHRASE_7 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> wrote: news:j10l01$os6$1 at smc.vnet.net... > Of course, it is quite possible that the references to your symbols > responsible for their not being garbage-collected are somewhere other than > the DownValues of In or Out, but if you find and remove these, you should > find that the symbols are garbage-collected (unless for some reason they > have had their Temporary attribute removed during the course of > execution). If this does not occur after all references have been removed, > then indeed a bug in the garbage collector would indeed be a possibility. There is a bug in the garbage collector (non-removing unreferenced temporary variables with their definitions): In[1]:= $HistoryLength=0; a[b_]:=Module[{c,d},d:=9;d/;b===1]; Length@Names[$Context<>"*"] Out[3]= 6 In[4]:= lst=Table[a[1],{1000}]; Length@Names[$Context<>"*"] Out[5]= 1007 In[6]:= lst=. Length@Names[$Context<>"*"] Out[7]= 1007 In[8]:= Definition@d$999 Out[8]= Attributes[d$999]={Temporary} d$999:=9 This bug was originally reported in this MathGroup post: http://forums.wolfram.com/mathgroup/archive/2010/Dec/msg00130.html From mathgroup-adm at smc.vnet.net Sun Jul 31 05:51:47 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D179B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:51:46 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VApmrk025217; Sun, 31 Jul 2011 05:51:48 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id ABF67FF006; Sun, 31 Jul 2011 05:51:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id A7EEABF417; Sun, 31 Jul 2011 05:51:45 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05286 for mathgroup-newout; Sun, 31 Jul 2011 07:27:56 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05281 for mathgroup-newsend; Sun, 31 Jul 2011 07:27:54 -0400 (EDT) Date: Sun, 31 Jul 2011 07:27:54 -0400 (EDT) Message-Id: <201107311127.HAA05281 at smc.vnet.net> From: "McHale, Paul" <Paul.McHale at excelitas.com> Subject: [mg120628] Performance under Lion To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.103915 This is just a general observation that I was wondering if anyone else if having. Under Lion, I have a test that 1. Parses over 100,000 filenames and reduces them to a list of interested files 2. Reads over 100,000 files of interest and extracts critical data 3. Writes data out to Excel Previous Snow Leopard could do this in under 10 minutes (very impressive). Upgrading to lion puts me in the under 15 minute category. Possible under 14 minutes. For obvious reasons, there is no need to post code as it didn't change. Anyone else having similar experiences? Paul Paul McHale | Electrical Engineer, Energetics Systems | Excelitas Technologies Corp. Phone: +1 937.865.3004 | Fax: +1 937.865.5170 | Mobile: +1 937.371.2828 1100 Vanguard Blvd, Miamisburg, Ohio 45342-0312 USA Paul.McHale at Excelitas.com<mailto:Paul.McHale at perkinelmer.com> www.excelitas.com<http://www.excelitas.com> [cid:image001.png at 01CB9136.E3D96D90] Please consider the environment before printing this e-mail. This email message and any attachments are confidential and proprietary to Excelitas Technologies Corp. If you are not the intended recipient of this message, please inform the sender by replying to this email or sending a message to the sender and destroy the message and any attachments. Thank you From mathgroup-adm at smc.vnet.net Sun Jul 31 05:54:33 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 4A1406BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:54:33 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAsYoU025782; Sun, 31 Jul 2011 05:54:34 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 57735A8110; Sun, 31 Jul 2011 05:54:34 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 17433FF006; Sun, 31 Jul 2011 05:54:31 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05197 for mathgroup-newout; Sun, 31 Jul 2011 07:25:43 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05192 for mathgroup-newsend; Sun, 31 Jul 2011 07:25:41 -0400 (EDT) Date: Sun, 31 Jul 2011 07:25:41 -0400 (EDT) Message-Id: <201107311125.HAA05192 at smc.vnet.net> From: "W. Craig Carter" <ccarter at mit.edu> Subject: [mg120616] Re: extra lines in framed plots? References: <201107301000.GAA25337 at smc.vnet.net> <201107301120.HAA26461 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.104515 Thank you Heike, that solved it. Palm-to-forehead head-slap: I stared at ListPlot's options for an embarrassingly long time without getting seeing that. It appears that the behavior changed between 8.0 and 8.01. I tried my example below on my home machine and didn't duplicate the behavior. Thanks, Craig On 30 Jul, 2011, at 7:20 AM, Heike Gramberg wrote: > Have you tried setting Axes->False? > > Heike > > On 30 Jul 2011, at 11:00, W Craig Carter wrote: > >> Hello, >> Does anybody know how to remove the "guide lines" in framed plots. >> >> When I do this: >> ListPlot[{{0.1, 0.2}, {0.5, 0.5}, {0.8, 0.9}}, Frame -> True] >> >> I get no extra vertical and horizontal lines. >> >> But, this: >> ListPlot[ >> {{0.4289099257180531`, >> 0.5537224743099745`}, {0.7079331672754348`, >> 0.0798617987377328`}, {0.7626789940630332`, >> 0.09782702610262328`}, {0.26298609181891597`, >> 0.23650806653149004`}, {0.9806031473561678`, >> 0.6881903807736833`}, {0.9182772394713157`, >> 0.7075757383962846`}, {0.6810394712373629`, >> 0.9042810359245328`}, {0.578527536404609`, >> 0.7751236633402536`}, {0.11853707159064841`, >> 0.5017138784723387`}, {0.05687399238151203`, 0.8564317614786938`}}, >> Frame -> True] >> >> produces two lines which I would like to remove. >> >> Thanks, Craig >> >> >> "8.0 for Mac OS X x86 (64-bit) (November 6, 2010)" >> >> W Craig Carter >> Professor of Materials Science, MIT >> >> >> >> > > From mathgroup-adm at smc.vnet.net Sun Jul 31 05:56:19 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7C29D6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:56:19 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAuK8w028233; Sun, 31 Jul 2011 05:56:20 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 342A4A81A1; Sun, 31 Jul 2011 05:56:20 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 987C3A8169; Sun, 31 Jul 2011 05:55:57 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05141 for mathgroup-newout; Sun, 31 Jul 2011 07:24:24 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05136 for mathgroup-newsend; Sun, 31 Jul 2011 07:24:23 -0400 (EDT) Date: Sun, 31 Jul 2011 07:24:23 -0400 (EDT) Message-Id: <201107311124.HAA05136 at smc.vnet.net> From: Andrzej Kozlowski <akoz at mimuw.edu.pl> Subject: [mg120609] Re: Why won't this sum evaluate? References: <j0oopr$kse$1 at smc.vnet.net> <201107301001.GAA25384 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.104515 For what it's worth: this sum does not evaluate if one begins with any value other than 1, e.g.: Sum[c^n/(1 + c^(2*n)), {n, 3, Infinity}] Sum[c^n/(c^(2*n) + 1), {n, 3, Infinity}] Secondly, Mathematica can't evaluate the sum from i when c is given a specific value, e.g. With[{c = 1/3}, Sum[c^n/(1 + c^(2*n)), {n, 1, Infinity}]] Sum[1/(3^n*(3^(-2*n) + 1)), {n, 1, Infinity}] NSum gets the answer quickly: With[{c = 1/3}, NSum[c^n/(1 + c^(2*n)), {n, 1, Infinity}]] 0.465259 This agrees with Sum[c^n/(1 + c^(2*n)), {n, 1, Infinity}] /. c -> 1/3 (1/4)*EllipticTheta[3, 0, 1/3]^2 - 1/4 N[%] 0.46525896368870245 N[%] 0.465259 Andrzej Kozlowski On 30 Jul 2011, at 12:01, Gary Wardall wrote: > On Jul 27, 5:20 am, PAR123 <reiser.p... at gmail.com> wrote: >> In[120]:= $Version >> Out[120]= "7.0 for Mac OS X x86 (32-bit) (January 30, 2009)" >> >> In[122]:= Sum[c^n/(1 + c^(2*n)), {n, 1, Infinity}] >> Out[122]= -(1/4) + 1/4 EllipticTheta[3, 0, c]^2 >> >> In[123]:= Sum[c^n/(1 + c^(2*n)), {n, 0, Infinity}] >> Out[123]= (won't simplify) >> >> The only thing different in the two sums is that the second sum is from 0 to Infinity rather than 1 to Infinity. Clearly, the n=zero term is 1/2. >> >> I have tried various Regularizations and Methods, (not exhaustively) but none seem to work on either of the sums, much less the last. >> >> A side problem - Is there a way to determine what Regularization and Method were used when none were specified? >> >> Thanks > > > I'm using the latest Mac version 8 and I get the same results as you > do. > > Gary Wardall > From mathgroup-adm at smc.vnet.net Sun Jul 31 05:58:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 8E5396BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:58:48 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VAwixq028410; Sun, 31 Jul 2011 05:58:49 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 7E388BF480; Sun, 31 Jul 2011 05:58:44 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 4EEF0BF483; Sun, 31 Jul 2011 05:58:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05240 for mathgroup-newout; Sun, 31 Jul 2011 07:26:49 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05235 for mathgroup-newsend; Sun, 31 Jul 2011 07:26:48 -0400 (EDT) Date: Sun, 31 Jul 2011 07:26:48 -0400 (EDT) Message-Id: <201107311126.HAA05235 at smc.vnet.net> From: "andre.robin3" <andre.robin3 at wanadoo.fr> Subject: [mg120622] Re: Feature idea (may already be there) References: <j10l2t$ot8$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.104814 These features already exist. They are very confortable. My prefered way to do that : ------------------------------ first cell : x0=1 x1=1 Dynamic[Plot[Sin[x],{x,x0,x1}] ----------------------------- subsequent cell(s) : ---------------------------- you try the different possibilies, for example : begin=0 end=6 and you see the modification on the plot in real time. "McHale, Paul" <Paul.McHale at excelitas.com> a écrit dans le message de news: j10l2t$ot8$1 at smc.vnet.net... > > I often have trouble viewing large amounts of data. Especially when I > want to zoom in on a feature. The only way I know to do it is > Manipulate[] or Plot[] with manually chosen limits. Is there another way > to pan and zoom on a plot? It would also be great if we could view these > settings and pass them to Plot[] as a parameter to achieve similar results > in subsequent executions of Plot[]. > > Of course, this assumes that this would also be applied to ListPlot*, > Plot*... > > Thanks, > Paul > > > Paul McHale | Electrical Engineer, Energetics Systems | Excelitas > Technologies Corp. > > Phone: +1 937.865.3004 | Fax: +1 937.865.5170 | Mobile: +1 > 937.371.2828 > 1100 Vanguard Blvd, Miamisburg, Ohio 45342-0312 USA > Paul.McHale at Excelitas.com<mailto:Paul.McHale at perkinelmer.com> > www.excelitas.com<http://www.excelitas.com> > > [cid:image001.png at 01CB9136.E3D96D90] > > Please consider the environment before printing this e-mail. > This email message and any attachments are confidential and proprietary to > Excelitas Technologies Corp. If you are not the intended recipient of this > message, please inform the sender by replying to this email or sending a > message to the sender and destroy the message and any attachments. > Thank you From mathgroup-adm at smc.vnet.net Sun Jul 31 05:59:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 139D76BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 05:59:59 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VB00O3028479; Sun, 31 Jul 2011 06:00:00 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 0CC11BF480; Sun, 31 Jul 2011 06:00:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 20F9FBF417; Sun, 31 Jul 2011 05:59:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05270 for mathgroup-newout; Sun, 31 Jul 2011 07:27:33 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05265 for mathgroup-newsend; Sun, 31 Jul 2011 07:27:33 -0400 (EDT) Date: Sun, 31 Jul 2011 07:27:33 -0400 (EDT) Message-Id: <201107311127.HAA05265 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120626] Re: FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0u7it$fb7$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.104814 > So, at least in this case, FinancialData is correct Correct in what sense? In the sense that it agrees with an unexplained column on a Yahoo page? > It seems the the price of this Janus fund is adjusted daily for > dividends/distributions And no, IMHO, that is not an explanation. Bobby On Sat, 30 Jul 2011 05:03:03 -0500, magma <maderri2 at gmail.com> wrote: > DrMajorBob wrote: >> As you see, FinancialData says the price was 10.23. > >> But I BOUGHT the stock through Janus Funds on that day, and the price >> was >> 10.36. > >> Moreover, if I go to Yahoo's interactive price chart for the stock at >> the >> following page, 10.36 is the price I find: > > Pierpaolo Bernardi replied: > >> Prices do vary continuously, they don't stay the same for a whole day, >> At the moment you bought it was 10.36. At the moment the data source >> was sampled it was 10.23. Usually historical data use the closing >> price, AFAIK. I see nothing strange in this. > > Bernardi's argument is valid in general, but not in this particular > case. > It seems that this Janus fund is not traded the whole day long, but > that only a closing price is issued every day, and all transactions > are executed at that price. > > The solution to this mysterious price divergence is simple. > Check the historical price series in yahoo: > http://finance.yahoo.com/q/hp?s=JANFX&a=01&b=05&c11&d=06&e=2= > 9&f11&g=d&z=66&y=66 > > (I hope the link comes out right, anyway check the historical price > link on the fund's page in Yahoo finance ) > > For the date 10 Feb 2011 you will see that the price is indeed 10.36$, > but in the rightmost column the ADJUSTED price is 10.23$, the same > reported in FinancialData. > It seems the the price of this Janus fund is adjusted daily for > dividends/distributions and that FinancialData just reports the > Adjusted price. > > So, at least in this case, FinancialData is correct > > > > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sun Jul 31 06:02:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id E89606BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 06:02:47 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VB2meD029174; Sun, 31 Jul 2011 06:02:48 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 34257BF483; Sun, 31 Jul 2011 06:02:48 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 40A4DBF480; Sun, 31 Jul 2011 06:02:46 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05154 for mathgroup-newout; Sun, 31 Jul 2011 07:24:46 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05149 for mathgroup-newsend; Sun, 31 Jul 2011 07:24:45 -0400 (EDT) Date: Sun, 31 Jul 2011 07:24:45 -0400 (EDT) Message-Id: <201107311124.HAA05149 at smc.vnet.net> From: =?ISO-8859-1?Q?Iv=E1n_Pulido_Sanchez?= <ijpulido.s at gmail.com> Subject: [mg120611] Re: Mathematica 8 remote parallel kernels References: <j0truv$d50$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.105117 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, __URI_NO_PATH! 0, __URI_NO_WWW! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, FROM_NAME_PHRASE 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __FRAUD_BODY_WEBMAIL 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On Sat, Jul 30, 2011 at 5:00 AM, Oleksandr Rasputinov < oleksandr_rasputinov at hmamail.com> wrote: > Perhaps you are exceeding your quota of kernel licences? (Particularly > likely on a shared server where others may or may not also be using some > of the available licences at any given time.) Another possibility, if you > are trying to launch a large number of parallel kernels, is that you are > running into some kind of limitation on the number of concurrent TCP/IP > connections. > > Other than that, it is likely platform-dependent, but you do not mention > what platform you are using. Correctly setting up Windows > client-to-Windows server parallel kernel operation is slightly more > difficult than for the other platforms, for example. > > Thanks for the ideas. And you are right I should've mentioned the OS it's running on. It's Linux (Debian Squeeze to be exact). I don't think it's a license issue since I can run on each node 4 Mathematica Kernels without problem, the problem is making them process in parallel (meaning parallel remote kernels). This used to work just fine with mathematica7 (Over 20 kernels without problem, now I can't get more than 10 in the best case) no idea what could have changed with mathematica8. I've tried manually running the kernels with the ssh command that is shown in the Parallel Kernel Configuration dialog without success (Link names problems and such). If you could help me with this it would be very much appreciated since this could lead to solve the problem. Thanks again for your response. > On Fri, 29 Jul 2011 09:45:19 +0100, Iv=E1n Pulido Sanchez > <ijpulido.s at gmail.com> wrote: > > > Hello, > > > > When I try to configure remote kernels in Mathematica via > > Evaluation>Parallel Kernel Configuration ... then I go to "Remote > > Kernels" > > and add hosts, after that I try to Launch the remote kernels and only = > > > some > > of them get launched (the number of them varies),and finally I get a msg > > like the following. > > > > KernelObject::rdead: Subkernel connected through remote[nodo2] appears > > dead. > >>> LinkConnect::linkc: Unable to connect to > >>> LinkObject[36154 at 192.168.1.104, > > 49648 at 192.168.1.104,38,12]. >> General::stop: Further output of > > LinkConnect::linkc will be suppressed during this calculation. >> > > > > Any ideas how to get this working? > > > > Take into account it sometimes does load some of the remote kernels but > > never all of them. Thanks in advance I hope you can help me with this. > From mathgroup-adm at smc.vnet.net Sun Jul 31 06:03:58 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 9CAC86BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 06:03:58 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VB3xBw029301; Sun, 31 Jul 2011 06:03:59 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 33544A815B; Sun, 31 Jul 2011 06:03:59 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 2D347A8110; Sun, 31 Jul 2011 06:03:57 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05164 for mathgroup-newout; Sun, 31 Jul 2011 07:24:58 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05159 for mathgroup-newsend; Sun, 31 Jul 2011 07:24:56 -0400 (EDT) Date: Sun, 31 Jul 2011 07:24:56 -0400 (EDT) Message-Id: <201107311124.HAA05159 at smc.vnet.net> From: "McHale, Paul" <Paul.McHale at excelitas.com> Subject: [mg120612] Windows possible memory leak To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.105117 I wanted to compare rules based processing performance to Table[] based processing performance. The following code section assumes the data was read in and certain variables are set. I executed the same code about 10 times in a row to get the output formatted and the comments/coding the way I wanted to leave it. I don't believe this code creates more data every time it is executed. I could be wrong. I believe the first time it is run, variables are created. Each subsequent run overwrites the variables. How do I end up with the "Out of memory" error? I should be able to "Shift-Enter" this all day long. I didn't lose anything. I just needed to reload certain data. It isn't just this code. It has happened many times before on other code. If I am doing something wrong, let me know so I can mend my ways :) Otherwise, I am inclined to believe there is some memory management (or setting?) issue. Running the same code over and over again should yield the same results (memory wise ;) ) (* Perform rule based processing *) RuleStartTime=Date[]; mListRule=InData /. {AA_,BB_,CC_,DD_,EE_,FF_} -> { {AA*mTimeCal,DD*mDivideBy*Calibration[[3]][[1]]+Calibration[[3]][[2]]}, {AA*mTimeCal,EE*mDivideBy*Calibration[[4]][[1]]+Calibration[[4]][[2]]},{AA*mTimeCal,FF*mDivideBy*Calibration[[5]][[1]]+Calibration[[5]][[2]]}}; RuleStopTime=Date[]; "Rule based processing time: "<> ToString @ DateDifference[RuleStartTime,RuleStopTime,"Second"] (* Perform Table[] based processing *) TableStartTime=Date[]; mData=Table[ {{InData[[i,1]]*mTimeCal,InData[[i,4]]*mDivideBy*Calibration[[3]][[1]]+Calibration[[3]][[2]]},{InData[[i,1]]*mTimeCal,InData[[i,5]]*mDivideBy*Calibration[[4]][[1]]+Calibration[[4]][[2]]},{InData[[i,1]]*mTimeCal,InData[[i,6]]*mDivideBy*Calibration[[5]][[1]]+Calibration[[5]][[2]]}}, {i,1,Length[InData]} ]; TableStopTime=Date[]; "Table based processing time: "<> ToString @ DateDifference[TableStartTime,TableStopTime,"Second"] (* Compare the two results *) "Comnparing the two results mListRule == mData -> " <> ToString @ (mListRule== mData) Rule based processing time: {3.01541, Second} Table based processing time: {1.29678, Second} Comnparing the two results mListRule == mData -> True Thanks, Paul Paul McHale | Electrical Engineer, Energetics Systems | Excelitas Technologies Corp. Phone: +1 937.865.3004 | Fax: +1 937.865.5170 | Mobile: +1 937.371.2828 1100 Vanguard Blvd, Miamisburg, Ohio 45342-0312 USA Paul.McHale at Excelitas.com<mailto:Paul.McHale at perkinelmer.com> www.excelitas.com<http://www.excelitas.com> [cid:image001.png at 01CB9136.E3D96D90] Please consider the environment before printing this e-mail. This email message and any attachments are confidential and proprietary to Excelitas Technologies Corp. If you are not the intended recipient of this message, please inform the sender by replying to this email or sending a message to the sender and destroy the message and any attachments. Thank you From mathgroup-adm at smc.vnet.net Sun Jul 31 06:06:54 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D49E16BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 06:06:53 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VB6t6s029612; Sun, 31 Jul 2011 06:06:55 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id CF7B5A818A; Sun, 31 Jul 2011 06:06:54 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id A8E7FFF008; Sun, 31 Jul 2011 06:06:52 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05220 for mathgroup-newout; Sun, 31 Jul 2011 07:26:15 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05215 for mathgroup-newsend; Sun, 31 Jul 2011 07:26:14 -0400 (EDT) Date: Sun, 31 Jul 2011 07:26:14 -0400 (EDT) Message-Id: <201107311126.HAA05215 at smc.vnet.net> From: Daniel Lichtblau <danl at wolfram.com> Subject: [mg120619] Re: Cumulative probability question To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.105715 ----- Original Message ----- > From: "Peter Sisak" <p-kun80 at hotmail.com> > To: mathgroup at smc.vnet.net > Sent: Saturday, July 30, 2011 4:59:41 AM > Subject: Cumulative probability question > I have been experimenting with Mathematica in order to receive answers > to my problem, so far without success. I have tried various forms of > CDF > and HypergeometricDistribution, but I seem to not know the proper > addressing of the parameters for the problem. > > The problem itself is the following (with numbers given for a more > illustrative example): Given an urn containing N(=70) items in total, > of which n(=4) are marked, we want to draw i(=2) or more marked > items. > > a) What is the formula describing the number of draws required to > succeed in drawing at least i items with a probability of at least > 50%? > b) How do you make a graph of the probability (of drawing at least i > items) graphed against the number of draws? > c) What are the equations that need to be solved to get a numerical > answer on a) and b)? > > Thank you for your assistance in advance > P=E9ter Sis=E1k I'll use notation n1 for the marked items, n2 for unmarked (so n1 is your n, and n1+n2 is your N, which is quite different from Mathematica's N). Suppose you do m draws. The probability of drawing from the n1 marked elements, in the first k draws, and drawing from the n2 unmarked on the remaining m-k draws, is Pochhammer[n1 - k + 1, k]* Pochhammer[n2 - (m - k) + 1, m - k]/Pochhammer[n1 + n2 - m + 1, m] If this seems like a bizarre formula, rewrite it in factorials and it should make more sense. Assuming I have it correct. To get the probability of exactly k form the n1 marked elements, appearing in any of the m draws, multiply by Binomial[m,k]. To get the probability of at least k marked elements appearing, sum the result from k to either of m or n1 (does not matter which because all terms after the min are zero). In[40]:= n1 = 4; n2 = 66; p[k_, m_, n1_, n2_] := Binomial[m, k]*Pochhammer[n1 - k + 1, k]* Pochhammer[n2 - (m - k) + 1, m - k]/Pochhammer[n1 + n2 - m + 1, m] In[43]:= prob[k_, m_, n1_, n2_] := Sum[p[j, m, n1, n2], {j, k, n1}] Your example: In[44]:= FindRoot[prob[2, m, 4, 66] == 1/2, {m, 20}] Out[44]= {m -> 26.92171019255432} So it's 27 draws you need to hit an expected 2 or more marked elements at least half the time. One can simulate these draws as follows. Take a random sample of m elements without replacement. See how many lie among the first n1 elements. If i or more, count the sample as passing the test. Then count how many tests pass on average. simulate[n1_, n_, k_, m_, reps_: 100] := Count[Table[ Count[RandomSample[Range[n], m], Alternatives @@ Range[n1]] >= k, {reps}], True]/reps the difference between 26 and 27 draws is noticeable. Not that I know what stats tests to use in order to quantify this. In[61]:= Table[simulate[n1, n1 + n2, 2, 26, 100] // N, {10}] Out[61]= {0.55, 0.41, 0.49, 0.47, 0.46, 0.44, 0.49, 0.49, 0.41, 0.49} In[62]:= Table[simulate[n1, n1 + n2, 2, 27, 100] // N, {10}] Out[62]= {0.59, 0.51, 0.4, 0.48, 0.48, 0.53, 0.5, 0.47, 0.55, 0.43} Here is a neat sort of test. Run this simulation many times. Count the entire run a success if at least half the runs show a success at least half the time. success[n1_, n2_, k_, m_, reps_] := Count[Table[simulate[n1, n1 + n2, k, m, reps], {reps}], aa_ /; aa >= 1/2] >= reps/2 In[68]:= Table[success[n1, n2, 2, 26, 100], {10}] Out[68]= {False, False, False, False, False, False, False, False, \ False, False} In[69]:= Table[success[n1, n2, 2, 27, 100], {10}] Out[69]= {True, True, True, True, True, False, True, True, True, True} These results will have to speak for themselves, since I don't actually know their language. Daniel Lichtblau Wolfram Research From mathgroup-adm at smc.vnet.net Sun Jul 31 06:07:44 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 2AB6C6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 06:07:44 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VB7jlS029693; Sun, 31 Jul 2011 06:07:45 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 3112AA8169; Sun, 31 Jul 2011 06:07:45 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 5CDD7A815B; Sun, 31 Jul 2011 06:07:42 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05255 for mathgroup-newout; Sun, 31 Jul 2011 07:27:11 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id HAA05251 for mathgroup-newsend; Sun, 31 Jul 2011 07:27:10 -0400 (EDT) Date: Sun, 31 Jul 2011 07:27:10 -0400 (EDT) Message-Id: <201107311127.HAA05251 at smc.vnet.net> From: John Fultz <jfultz at wolfram.com> Subject: [mg120624] Re: Preventing In-line Math Typesetting From Being Scaled Down in Text Reply-To: jfultz at wolfram.com To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.105715 On Sat, 30 Jul 2011 06:03:25 -0400 (EDT), blamm64 wrote: > On Jul 27, 6:15 am, John Fultz <jfu... at wolfram.com> wrote: >> Looks like there's a minor bug in the updating mechanism. Perhaps this >> is what you ran into. If, after following my procedure, you save, >> close, and reopen the notebook, you'll see that the change has taken >> effect. >> >> Core.nb is inside the Mathematica layout, but it's generally not a good >> idea to be changing things there. If you're hoping to make the change >> globally for all notebooks on your system, let me know and I can walk >> you through that procedure. However, doing so will not change the >> notebook when viewed on somebody else's system, where as the Format- >> >Edit Stylesheet... change will persist with the notebook regardless of >> which system it's viewed on. >> >> Sincerely, >> >> John Fultz >> jfu... at wolfram.com >> User Interface Group >> Wolfram Research, Inc. >> >> >> On Tue, 26 Jul 2011 14:10:44 -0400, Gregory Lypny wrote: >>> Hello Mr. Fultz, >>> >>> Tried but it didn't work. I executed the command in the stylesheet >>> notebook corresponding to the notebook I'm working with. Perhaps I've >>> misunderstood. Also, not sure where to find Core.nb. Is it in the >>> application package? >>> >>> Gregory Lypny >>> >>>> On Fri, 22 Jul 2011 19:46:07 -0400 (EDT), Gregory Lypny wrote: >>>>> Hi everyone, >>>>> >>>>> When I include fractions as inline math typesetting, they are >>>>> scaled >>>>> down >>>>> to fit the effective line height of the cell. How can I prevent >>>>> this >>>>> or, >>>>> I guess, make the line height automatically expand to accommodate >>>>> the >>>>> math? If my regular text in the cell is 12-point times, I'd like >>>>> all >>>>> math variables that are not subscripts or superscripts to be 12- >>>>> point >>>>> as >>>>> well. >>>>> >>>>> Incidentally, other big typeset objects like matrices are not >>>>> scaled >>>>> down, or at least they down't appear to be. >>>>> >>>>> Sincerely, >>>>> >>>>> Gregory >>>>> >>>> If you look in Core.nb, you'll find a style called "InlineCell". >>>> This >>>> style is >>>> automatically applied to all inline cells everywhere. One of the >>>> options it has >>>> set is: >>>> >>>> ScriptLevel->1 >>>> >>>> This is what's causing the behavior you're seeing. You can override >>>> this with a >>>> custom stylesheet. For example, in a given notebook, you can make a >>>> private >>>> override by doing Format->Edit Stylesheet..., and pasting and >>>> interpreting the >>>> following cell expression at the end of the resulting stylesheet >>>> notebook: >>>> >>>> Cell[StyleData["InlineCell"], ScriptLevel->0] >>>> >>>> Sincerely, >>>> >>>> John Fultz >>>> jfu... at wolfram.com >>>> User Interface Group >>>> Wolfram Research, Inc.- Hide quoted text - >>>> >> - Show quoted text - >> > Thanks John! Is there anything similar for Input cells > (StandardForm)? Often, I prefer to enter math Input in 2D, and if I > enter a 2D Piecewise, and one or more lines of the Piecewise have > fractions and/or square roots, the font ends up being really tiny (for > me). So some similar setting for Input (StandardForm) to force the > font size to be the same regardless of position would be helpful to > me. > > -Brian L. Here's a little tutorial on what's going on: There are three options which control how scripts and fractions shrink. * ScriptMinSize - this is the minimum size (in points) of the font which will ever be used inside of a script/fraction. * ScriptSizeMultipliers - this is the multiplier is used each time you add a script/fraction level. I.e., by default, fonts shrink by a factor of .71 for each script level. * ScriptLevel is the option which determines how deep the script is. This is set by Mathematica automatically, but it is possible to override it via the Option Inspector or in a stylesheet. So, the resulting font size is going to be: Min[ Max[ScriptMinSize, ScriptSizeMultipliers^Max[ScriptLevel-1,0] * currentFontSize], currentFontSize] Which means ScriptLevels of 0 and 1 never shrink, but 2 and greater do. It's a bit more complicated than this because you can pass ScriptSizeMultipliers a list...see the documentation for details...but this describes the default case accurately. ScriptLevel is 0 in Input cells and 1 in inline cells (the latter behavior being determined from the stylesheet). In nested fractions it always increments by 1. In nested scripts, it always starts at least at 2 in the outermost script, and then increments by 1. ScriptLevel can also get set automatically by Mathematica a few other times. One of them, as you're running into, is inside of a GridBox. The front end allows the ScriptLevel to be incremented from 0 to 1 (but not greater than 1) when inside of a GridBox. That's why you're seeing Piecewise behave the way it does. This means that first-level fractions, by default, don't shrink in Input cells because their ScriptLevel is 1, but first-level fractions in inline cells and grids shrink because their scriptLevel is 2. Possibilities... * You could get rid of shrinking entirely by setting ScriptSizeMultipliers->{1.}, or stop the first-level shrinking by using ScriptSizeMultipliers->{1.,.71}. You can also set ScriptMinSize to an outrageously large value. You could set this at global scope, or on the StandardForm style. * It's possible to target Piecewise specifically by changing the "Piecewise" style. Devising a solution for this was slightly tricky, as I wanted to preserve shrinking behavior, but not for top-level fractions. Here's what I came up with: Cell[StyleData["Piecewise"], FractionBoxOptions->{BaseStyle->{ScriptLevel->1}}] This doesn't shrink nested fractions, but it does shrink scripts, and itacts pretty reasonably with fractions inside of scripts. Sincerely, John Fultz jfultz at wolfram.com User Interface Group Wolfram Research, Inc. From mathgroup-adm at smc.vnet.net Sun Jul 31 06:10:51 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 1D6726BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 06:10:51 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p6VBAqMr029877; Sun, 31 Jul 2011 06:10:52 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 693A7FF00A; Sun, 31 Jul 2011 06:10:52 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 797EBA8110; Sun, 31 Jul 2011 06:10:50 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA05733 for mathgroup-newout; Sun, 31 Jul 2011 08:03:40 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id IAA05729 for mathgroup-newsend; Sun, 31 Jul 2011 08:03:40 -0400 (EDT) Date: Sun, 31 Jul 2011 08:03:40 -0400 (EDT) Message-Id: <201107311203.IAA05729 at smc.vnet.net> From: magma <maderri2 at gmail.com> Subject: [mg120629] Re: FinancialData errors References: <201107222344.TAA28525 at smc.vnet.net> <j0u7it$fb7$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.7.31.105715 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, BODY_SIZE_900_999 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __STOCK_PHRASE_6 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. For DrMajorBob DrMajorBob wrote: >Correct in what sense? In the sense that it agrees with an unexplained column on a Yahoo page? No Bobby, in the sense that FinancialData gave you back EXACTLY what you asked for! Let me explain: this is perhaps not so well known/interiorized by most users, but FinancialData info page clearly states that: "For historical data, properties such as "High", "Low", "Close" are adjusted for stock splits, dividends and related changes." So when Bobby asked FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] Mathematica gave back historical closing prices ADJUSTED for stock spits ,ect. In order to get the RAW closing prices, one has to ask for FinancialData["JANFX", "RawClose", {{2011, 2, 9}, {2011, 2, 11}}] and indeed one gets.... {{{2011, 2, 9}, 10.38}, {{2011, 2, 10}, 10.36}, {{2011, 2, 11}, 10.37}} the famous 10.36$ paid by Bobby on Feb 10th 2011. hth From mathgroup-adm at smc.vnet.net Sun Jul 31 21:42:09 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id F30A96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:42:08 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712gAdB002662; Sun, 31 Jul 2011 21:42:10 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 281D5A80BA; Sun, 31 Jul 2011 21:42:10 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 32B3EBF417; Sun, 31 Jul 2011 21:42:08 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11337 for mathgroup-newout; Sun, 31 Jul 2011 23:35:54 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11331 for mathgroup-newsend; Sun, 31 Jul 2011 23:35:52 -0400 (EDT) Date: Sun, 31 Jul 2011 23:35:52 -0400 (EDT) Message-Id: <201108010335.XAA11331 at smc.vnet.net> From: Bob Hanlon <hanlonr at cox.net> Subject: [mg120633] Re: special iterator Reply-To: hanlonr at cox.net To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.23314 I think that you mean this Table[f[i], {i, DeleteCases[Range[10], 3 | 4]}] {f[1], f[2], f[5], f[6], f[7], f[8], f[9], f[10]} Bob Hanlon ---- "andre.robin3" <andre.robin3 at wanadoo.fr> wrote: ============= If you use the iterator in a Table[...], and you can do something like this : Table[i, { f[i] , DeleteCases[Range[10], 3 | 4}] ---> {f[1], f[2], f[5], f[6], f[7], f[8], f[9], f[10]} mathematica 7 see the doc of Table[ ] : "Table[exp,{i,{i1,i2,...}}] uses the successives values i1,i2,... ." I think It doesn't work on too old versions of mathematica (<5 ? ) "lorenzo" <lorenzo_ktm at yahoo.it> a =C3=A9crit dans le message de news: j10kmc$omh$1 at smc.vnet.net... > Hello everybody, > > I would like to define an iterator to explore all the elements in a list > except for the one of index j. > > something like: > {index,0,Length[myList]} and if index == j ---> index++ > > Is it possible? > Can I do this without deleting the j-th element? > > Thank you very much for helping :) > From mathgroup-adm at smc.vnet.net Sun Jul 31 21:42:41 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id D9FF96BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:42:41 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712gh7w002717; Sun, 31 Jul 2011 21:42:43 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 3459AFF006; Sun, 31 Jul 2011 21:42:43 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 65E7ABF42E; Sun, 31 Jul 2011 21:42:41 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11351 for mathgroup-newout; Sun, 31 Jul 2011 23:36:16 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11346 for mathgroup-newsend; Sun, 31 Jul 2011 23:36:14 -0400 (EDT) Date: Sun, 31 Jul 2011 23:36:14 -0400 (EDT) Message-Id: <201108010336.XAA11346 at smc.vnet.net> From: The Princess and the Profet <naturalezabuda at gmail.com> Subject: [mg120635] Another way to represent complex function graphically To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.23314 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_100_199 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, FROM_NAME_PHRASE 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. A complex function es f:z-->f(z) where z=a+bi. z can be represent in R2. As R2 is isomorfic to the Steregrafic Sphere. A complex function can be graphically represented by to spheres. From mathgroup-adm at smc.vnet.net Sun Jul 31 21:42:55 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id F314F6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:42:54 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712gugl002730; Sun, 31 Jul 2011 21:42:56 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 43499FF009; Sun, 31 Jul 2011 21:42:56 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id AAE9BFF006; Sun, 31 Jul 2011 21:42:53 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11312 for mathgroup-newout; Sun, 31 Jul 2011 23:35:20 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11307 for mathgroup-newsend; Sun, 31 Jul 2011 23:35:19 -0400 (EDT) Date: Sun, 31 Jul 2011 23:35:19 -0400 (EDT) Message-Id: <201108010335.XAA11307 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120630] Re: Multiple Styles References: <201107311125.HAA05169 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.22714 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1300_1399 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. If you want the curves to have the same thickness but a different colour, you could use BaseStyle to set the thickness and PlotStyle to set the colours of the individual curves, so for example: ParametricPlot3D[ Evaluate[Table[{2 i + Cos[th i] Sin[th], Sin[th i] Sin[th], Cos[th]}, {i, 1, 4}]], {th, 0, 2 Pi}, BaseStyle -> Thickness[0.01], PlotStyle -> Table[Hue[i/4], {i, 4}]] If you want the different curves to have different thicknesses as well, you can combine them with the colours in PlotStyle like for example ParametricPlot3D[ Evaluate[Table[{2 i + Cos[th i] Sin[th], Sin[th i] Sin[th], Cos[th]}, {i, 1, 4}]], {th, 0, 2 Pi}, PlotStyle -> Table[{Thickness[i 0.01], Hue[i/4]}, {i, 4}]] Heike On 31 Jul 2011, at 12:25, ace55555 wrote: > I am trying to change both the thickness and color of four parametric curves using PlotStyle. However, I either get the thickness or the colors to work but not both. I tried two different lines of code at the end of ParametricPlot3D: > ..,PlotStyle -> {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]}}, PlotStyle -> {Thickness[0.01]} > ..,PlotStyle -> {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]},{ Thickness[0.01]}} > It would be deeply appreciated if someone could help me on this matter. Thanks. > From mathgroup-adm at smc.vnet.net Sun Jul 31 21:44:59 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 14E386BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:44:59 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712j0Q0003001; Sun, 31 Jul 2011 21:45:00 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 0F506A80BA; Sun, 31 Jul 2011 21:45:00 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 32060BF42E; Sun, 31 Jul 2011 21:44:58 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11383 for mathgroup-newout; Sun, 31 Jul 2011 23:37:10 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11378 for mathgroup-newsend; Sun, 31 Jul 2011 23:37:09 -0400 (EDT) Date: Sun, 31 Jul 2011 23:37:09 -0400 (EDT) Message-Id: <201108010337.XAA11378 at smc.vnet.net> From: lorenzo <lorenzo_ktm at yahoo.it> Subject: [mg120640] Re: [Mathematica] special iterator To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.23314 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_YAHOO 0.1, FROM_NAME_ONE_WORD 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_LESS 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_200_299 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, SMALL_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_YAHOO 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. Thanks for all the answers, I used Delete, apparently it returns a list without the j-th element and the original list is not affected by any side effect: wi = Function[{x, j, func, data}, Product[func[x - Delete[data, j][[i]]], {i, 1, Length[data] - 1}]]; From mathgroup-adm at smc.vnet.net Sun Jul 31 21:46:40 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id A98466BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:46:40 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712kgc4003212; Sun, 31 Jul 2011 21:46:42 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id F1497FF006; Sun, 31 Jul 2011 21:46:41 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 5C081BF47E; Sun, 31 Jul 2011 21:46:40 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11377 for mathgroup-newout; Sun, 31 Jul 2011 23:37:00 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11372 for mathgroup-newsend; Sun, 31 Jul 2011 23:36:58 -0400 (EDT) Date: Sun, 31 Jul 2011 23:36:58 -0400 (EDT) Message-Id: <201108010336.XAA11372 at smc.vnet.net> From: Helen Read <readhpr at gmail.com> Subject: [mg120639] Re: Doesn't work in Mathematica 8 References: <j13ecj$562$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.23616 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1000_1099 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_MEDIA_BODY 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. On 7/31/2011 7:30 AM, Scott Blomquist (sblom) wrote: > An equation for plotting a Batman symbol has been making the rounds on > the internet. I figured it'd be fun to reproduce the originator's > result for myself in Mathematica 8, so I carefully typed it in and > tried a ContourPlot[batman[x,y]==0,{x,-8,8},{y,-4,4}]. It didn't work. > I broke it down into constituent pieces and plotted each of the > topmost () sections by itself. Most of them work as expected, but a > few of them don't. > > Reports from those with access to older versions of Mathematica > indicate some luck getting the equation to work with ImplicitPlot: > http://www.reddit.com/r/pics/comments/j2qjc/do_you_like_batman_do_you_like_math_my_math/c28ozge > > Do any of you have any tips for fixing my attempt to ContourPlot this? > Any ideas why this is working with older versions of Mathematica but > not the latest one? > It would be easier for us to help you if you post the actual code that you used. -- Helen Read University of Vermont From mathgroup-adm at smc.vnet.net Sun Jul 31 21:48:35 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 366F46BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:48:35 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712mapD003485; Sun, 31 Jul 2011 21:48:36 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 79D53A815B; Sun, 31 Jul 2011 21:48:36 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 40784A8110; Sun, 31 Jul 2011 21:48:34 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11371 for mathgroup-newout; Sun, 31 Jul 2011 23:36:48 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11366 for mathgroup-newsend; Sun, 31 Jul 2011 23:36:47 -0400 (EDT) Date: Sun, 31 Jul 2011 23:36:47 -0400 (EDT) Message-Id: <201108010336.XAA11366 at smc.vnet.net> From: Helen Read <readhpr at gmail.com> Subject: [mg120638] Re: Multiple Styles References: <j13e5s$53p$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.23616 X-PMX-Spam: Gauge=XXXIIII, Probability=34%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, SUPERLONG_LINE 0.05, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_1200_1299 0, BODY_SIZE_2000_LESS 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIIII, Probability=34%, DEPRECATED. Use X-PMX-Spam. On 7/31/2011 7:26 AM, ace55555 wrote: > I am trying to change both the thickness and color of four parametric curves using PlotStyle. However, I either get the thickness or the colors to work but not both. I tried two different lines of code at the end of ParametricPlot3D: > ..,PlotStyle -> {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]}},PlotStyle -> {Thickness[0.01]} > ..,PlotStyle -> {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]},{Thickness[0.01]}} > It would be deeply appreciated if someone could help me on this matter. Thanks. > You can use Directive to specify multiple styles for each curve. For example: curves = Table[{r Cos[t], r Sin[t]}, {r, 1, 4}]; ParametricPlot[curves, {t, 0, 2 \[Pi]}, PlotStyle -> {Directive[Red, Thick], Directive[Blue, Dashed], Directive[Green, Thick, Dashing[Large]], Directive[Purple, Dotted]}] With some of the plotting functions it will also work to give a list of lists of Styles, like this: ParametricPlot[curves, {t, 0, 2 \[Pi]}, PlotStyle -> {{Red, Thick}, {Blue, Thick}, {Green, Thick}, {Purple, Thick,Dashed}}] But sometimes Directive is required. -- Helen Read University of Vermont From mathgroup-adm at smc.vnet.net Sun Jul 31 21:50:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 5DE9B6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:50:52 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712orou003677; Sun, 31 Jul 2011 21:50:53 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx3.wolfram.com (Postfix) with SMTP id 4F7FFA818A; Sun, 31 Jul 2011 21:50:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 7CEE0A80BA; Sun, 31 Jul 2011 21:50:51 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11363 for mathgroup-newout; Sun, 31 Jul 2011 23:36:37 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11358 for mathgroup-newsend; Sun, 31 Jul 2011 23:36:36 -0400 (EDT) Date: Sun, 31 Jul 2011 23:36:36 -0400 (EDT) Message-Id: <201108010336.XAA11358 at smc.vnet.net> From: DrMajorBob <btreat1 at austin.rr.com> Subject: [mg120637] Re: FinancialData errors Reply-To: drmajorbob at yahoo.com References: <201107222344.TAA28525 at smc.vnet.net> <j0u7it$fb7$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.23616 You are right, I could have asked for RAW close. But there IS only one price for that date, and any adjustments need a precise explanation. MinHsuan Peng (thank you!) at Wolfram has provided that explanation. Using adjusted prices, rather than the ACTUAL prices, as the default seems an odd choice, however. Bobby On Sun, 31 Jul 2011 07:03:40 -0500, magma <maderri2 at gmail.com> wrote: > For DrMajorBob > > DrMajorBob wrote: >> Correct in what sense? In the sense that it agrees with an unexplained >> column on a Yahoo page? > > > > No Bobby, in the sense that FinancialData gave you back EXACTLY what > you asked for! > > Let me explain: > this is perhaps not so well known/interiorized by most users, but > FinancialData info page clearly states that: > > "For historical data, properties such as "High", "Low", "Close" are > adjusted for stock splits, dividends and related changes." > > So when Bobby asked > FinancialData["JANFX", {{2011, 2, 9}, {2011, 2, 11}}] > > Mathematica gave back historical closing prices ADJUSTED for stock spits > ,ect. > > In order to get the RAW closing prices, one has to ask for > > FinancialData["JANFX", "RawClose", {{2011, 2, 9}, {2011, 2, 11}}] > > and indeed one gets.... > > {{{2011, 2, 9}, 10.38}, {{2011, 2, 10}, 10.36}, {{2011, 2, 11}, > 10.37}} > > the famous 10.36$ paid by Bobby on Feb 10th 2011. > > hth > -- DrMajorBob at yahoo.com From mathgroup-adm at smc.vnet.net Sun Jul 31 21:52:49 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 982736BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:52:49 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712qoA1003932; Sun, 31 Jul 2011 21:52:50 -0500 Received: from mx4.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id 7741CBF417; Sun, 31 Jul 2011 21:52:50 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id AADF9BF42E; Sun, 31 Jul 2011 21:52:48 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11396 for mathgroup-newout; Sun, 31 Jul 2011 23:37:33 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11392 for mathgroup-newsend; Sun, 31 Jul 2011 23:37:32 -0400 (EDT) Date: Sun, 31 Jul 2011 23:37:32 -0400 (EDT) Message-Id: <201108010337.XAA11392 at smc.vnet.net> From: Kris Carlson <carlsonkw at gmail.com> Subject: [mg120642] Local scoping of pattern names in rules--or not To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.24214 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Hi, I am writing a function to find the shortest paths from a source vertex to a target in a directed graph. The actual application of this is identifying possible circuits in the spinal cord where an electrical stimulator interferes with pain signals and alleviates the pain. To find direct connections from source to target, even with 11K connections, is trivial, but it's less so with intermediate nodes, variable path length in the # of vertices, and recurrence. I could not find a built-in shortest paths function with variable path length, or in Combinatorica. If you know of one please let me know. Sometimes the local scoping in Rule and Cases works and sometimes not. I'd like to have a better understanding of this. Here is what Tech Support wrote me a while ago after some initial confusion about the cause and solution themselves, and a toy example: Thank you for the email. I apologize for not providing explanations in my notebook for what exactly Mathematica is doing. In fact I have figured out that it is not a problem with your variables being symbols or lists but rather that of evaluating the Rule itself. For some reason, even when the variables are locally scoped, Mathematica is evaluating their values before the rule is evaluated. Using a Rule Delayed (:>) solves this problem and the results are as expected. I have inserted my comments/explanations in the attached notebook. In[558]:= aList=Range[10];n=7; In[563]:= f1[list1_List]:=Module[{},Cases[aList,n_/;n>3->50]] f2[list1_List]:=Module[{},Cases[aList,n_->{a,n,b}]] (* local scoping doesn't work as intended *) In[565]:= f3[list1_List]:=Module[{},Cases[aList,n_:>{a,n,b}]] In[564]:= f1[aList] Out[564]= {50,50,50,50,50,50,50} In[562]:= f2[aList] Out[562]= {{a,7,b},{a,7,b},{a,7,b},{a,7,b},{a,7,b},{a,7,b},{a,7,b},{a,7,b},{a,7,b},{a,7,b}} In[566]:= f3[aList] Out[566]= {{a,1,b},{a,2,b},{a,3,b},{a,4,b},{a,5,b},{a,6,b},{a,7,b},{a,8,b},{a,9,b},{a,10,b}} Thanks, Kris From mathgroup-adm at smc.vnet.net Sun Jul 31 21:54:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id C4CEA6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:54:46 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712smrW004032; Sun, 31 Jul 2011 21:54:48 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id C37BABF47E; Sun, 31 Jul 2011 21:54:47 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id BE630A815B; Sun, 31 Jul 2011 21:54:45 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11325 for mathgroup-newout; Sun, 31 Jul 2011 23:35:42 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11321 for mathgroup-newsend; Sun, 31 Jul 2011 23:35:41 -0400 (EDT) Date: Sun, 31 Jul 2011 23:35:41 -0400 (EDT) Message-Id: <201108010335.XAA11321 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120632] Re: In Version 8, Combinatorial&GraphTheory functions confuse me completely References: <201107311126.HAA05207 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.24214 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODYTEXTP_SIZE_3000_LESS 0, BODY_SIZE_2000_2999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, NO_URI_FOUND 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __CP_NAME_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __SUBJ_ALPHA_END 0, __TO_NO_NAME 0' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. Which functionality from the Combinatorica package are you missing? I don't know if you have read the entry Compatibility/tutorial/Combinatorica in the Document Center in Mathematica, but it explains how you can achieve some of the functionality of the Combinatorica package with the new built in symbols. Essentially, you can still load and use the package as before; the message is just a warning that some of the symbols in the loaded package may clash with the built-in symbols. After loading the package, the symbols in the Combinatorica package will shadow the built-in symbols meaning that if you call for example Graph, Mathematica will use the one in the Combinatorica package, instead of the built-in one. Luckily, both symbols exist in their own context, so you can distinguish between them by calling them with their full Context name. For example System`Graph[{1 -> 2}] will call the built in function Graph, and Combinatorica`Graph[{{{1, 2}}}, {{{0, 0}}, {{1, 0}}}] the function Graph defined in the Combinatorica package (provided the package is loaded). So for the second part of your post, you could do something like g = System`Graph[Table[i \[UndirectedEdge] Mod[i + 1, 2], {i, 20}]] Heike. On 31 Jul 2011, at 12:26, a boy wrote: > 1. Mathematica8 says Combinatorica Graph and Permutations > functionality has been superseded by preloaded functionaliy. But " > preloaded functionaliy" seems to be not completed yet. There are only > a few "preloaded functionaliy". At now, how to use Combinatorica & > GraphUtilities package? > > << Combinatorica` > Needs["GraphUtilities`"] > ModMatrix[n_, list_] := > Table[If[MemberQ[list, Mod[j - i, n]], 1, 0], {i, 1, n}, {j, 1, n}] > QuadraticModMatrix[n1_, list1_, n2_, list2_] := > ModMatrix[n1, list1] + ArrayPad[ModMatrix[n2, list2], {0, n1 - n2}] > > General::compat: Combinatorica Graph and Permutations functionality > has been superseded by preloaded functionaliy. The package now being > loaded may conflict with this. Please see the Compatibility Guide for > details. > > 2. Both GraphPlot[g] and ShowGraph[g] doesn't work! How to plot these > Graphs as below? > > In[71]:= n = 1; > While[n++ < 10, > g = Graph[Table[i \[UndirectedEdge] Mod[i + 1, 2], {i, 20}]] > ]; > g > From mathgroup-adm at smc.vnet.net Sun Jul 31 21:57:06 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id AD4F36BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:57:06 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712v8oD005011; Sun, 31 Jul 2011 21:57:08 -0500 Received: from mx4.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id C220EA80BA; Sun, 31 Jul 2011 21:57:07 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx4; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx4.wolfram.com (Postfix) with ESMTP id 6698ABF42E; Sun, 31 Jul 2011 21:57:05 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11318 for mathgroup-newout; Sun, 31 Jul 2011 23:35:31 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11313 for mathgroup-newsend; Sun, 31 Jul 2011 23:35:30 -0400 (EDT) Date: Sun, 31 Jul 2011 23:35:30 -0400 (EDT) Message-Id: <201108010335.XAA11313 at smc.vnet.net> From: Heike Gramberg <heike.gramberg at gmail.com> Subject: [mg120631] Re: Doesn't work in Mathematica 8 References: <201107311126.HAA05223 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.25122 X-PMX-Spam: Gauge=XXXIII, Probability=33%, Report=' __PHISH_SPEAR_STRUCTURE_1! 0, __TO_MALFORMED_2! 0, RDNS_SUSP_FORGED_FROM 3.5, FORGED_FROM_GMAIL 0.1, BODY_SIZE_3000_3999 0, BODY_SIZE_5000_LESS 0, BODY_SIZE_7000_LESS 0, RDNS_GENERIC_POOLED 0, RDNS_SUSP 0, RDNS_SUSP_GENERIC 0, __ANY_URI 0, __CP_MEDIA_BODY 0, __CP_URI_IN_BODY 0, __FRAUD_WEBMAIL 0, __FRAUD_WEBMAIL_FROM 0, __FROM_GMAIL 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0, __SANE_MSGID 0, __TO_NO_NAME 0, __URI_NO_MAILTO 0, __URI_NS ' X-PerlMx-Spam: Gauge=XXXIII, Probability=33%, DEPRECATED. Use X-PMX-Spam. I guess the problem is that the function plotted is complex almost everywhere in the xy-plane which is something ContourPlot doesn't like. If you look at the function carefully, however, you can get it to work but it takes a bit of effort. The graph plotted is the solution of ((x/7)^2 g[Abs[x] - 3] + (y/3)^2 g[y + (3 Sqrt[33])/7] - 1) (Abs[x/2] - ((3 Sqrt[33] - 7)/112) x^2 - 3 + Sqrt[1 - (Abs[Abs[x] - 2] - 1)^2] - y) (9 g[(1 - Abs[x]) (Abs[x] - 3/4)] - 8 Abs[x] - y) (3 Abs[x] + .75 g[(3/4 - Abs[x]) (Abs[x] - 1/2)] - y) (9/4 g[((1/2 - x) (1/2 + x))] - y) ((6 Sqrt[10])/ 7 + (3/2 - Abs[x]/2) g[(Abs[x] - 1)] - (6 Sqrt[10])/14 Sqrt[ 4 - (Abs[x] - 1)^2] - y)==0 where g[a_]:=Sqrt[Abs[a]/a]. Note that g[a] is basically the same as PieceWise[{{1,a>0},{I,a<0}}]. Since the left-hand side is the product of 6 parts it's equal to zero if and only if any of those parts is zero. Setting the first part to zero gives something like ((x/7)^2 g[(Abs[x] - 3)] + (y/3)^2 g[(y + (3 Sqrt[33])/7)] - 1)==0 =46rom the definition of g we find that this has real solutions for x and y if Abs[x]>3 and y> - (3 Sqrt[33])/7) fin which case we get (x/7)^2 + (y/3)^2 - 1 ==0 Therefore, the part of the plot corresponding to the first part being equal to zero becomes something like pl1 = ContourPlot[((x/7)^2 + (y/3)^2 - 1) == 0, {x, -8, 8}, {y, -5, 5}, RegionFunction -> ((Abs[#1] > 3 && #2 > -(3 Sqrt[33])/7) &)] If you do the same with the other parts you get pl2 = ContourPlot[(Abs[x/2] - ((3 Sqrt[33] - 7)/112) x^2 - 3 + Sqrt[1 - (Abs[Abs[x] - 2] - 1)^2] - y) == 0, {x, -7, 7}, {y, -3, 3}] pl3 = ContourPlot[(9 - 8 Abs[x] - y) == 0, {x, -7, 7}, {y, -3, 3}, RegionFunction -> ((3/4 < Abs[#] < 1) &)] pl4 = ContourPlot[(3 Abs[x] + 3/4 - y) == 0, {x, -7, 7}, {y, -3, 3}, RegionFunction -> ((1/2 < Abs[#1] < 3/4) &)] pl5 = ContourPlot[(9/4 - y) == 0 , {x, -7, 7}, {y, -3, 3}, RegionFunction -> ((Abs[#1] < 1/2) &)] pl6 = ContourPlot[((6 Sqrt[10])/ 7 + (3/2 - Abs[x]/2) - (6 Sqrt[10])/14 Sqrt[ 4 - (Abs[x] - 1)^2] - y) == 0 , {x, -7, 7}, {y, -3, 3}, RegionFunction -> ((Abs[#1] > 1) &)] And combining everything gives Show[{pl1, pl2, pl3, pl4, pl5, pl6}] Heike On 31 Jul 2011, at 12:26, Scott Blomquist (sblom) wrote: > An equation for plotting a Batman symbol has been making the rounds on > the internet. I figured it'd be fun to reproduce the originator's > result for myself in Mathematica 8, so I carefully typed it in and > tried a ContourPlot[batman[x,y]==0,{x,-8,8},{y,-4,4}]. It didn't work. > I broke it down into constituent pieces and plotted each of the > topmost () sections by itself. Most of them work as expected, but a > few of them don't. > > Reports from those with access to older versions of Mathematica > indicate some luck getting the equation to work with ImplicitPlot: > = http://www.reddit.com/r/pics/comments/j2qjc/do_you_like_batman_do_you_like_math_my_math/c28ozge > > Do any of you have any tips for fixing my attempt to ContourPlot this? > Any ideas why this is working with older versions of Mathematica but > not the latest one? > From mathgroup-adm at smc.vnet.net Sun Jul 31 21:58:48 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 517CB6BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 21:58:48 -0500 (CDT) Received: from mx3.wolfram.com (mx3.wolfram.com [140.177.205.143]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p712wn06005204; Sun, 31 Jul 2011 21:58:49 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx3.wolfram.com (Postfix) with SMTP id 2FD3DA80BA; Sun, 31 Jul 2011 21:58:49 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 02B5CA8110; Sun, 31 Jul 2011 21:58:47 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11391 for mathgroup-newout; Sun, 31 Jul 2011 23:37:22 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11386 for mathgroup-newsend; Sun, 31 Jul 2011 23:37:21 -0400 (EDT) Date: Sun, 31 Jul 2011 23:37:21 -0400 (EDT) Message-Id: <201108010337.XAA11386 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120641] Re: Mathematica 8 remote parallel kernels References: <j0truv$d50$1 at smc.vnet.net> <j13e3u$52e$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.25122 On Sun, 31 Jul 2011 12:25:50 +0100, Iv=E1n Pulido Sanchez <ijpulido.s at gmail.com> wrote: > On Sat, Jul 30, 2011 at 5:00 AM, Oleksandr Rasputinov < > oleksandr_rasputinov at hmamail.com> wrote: > >> Perhaps you are exceeding your quota of kernel licences? (Particularly >> likely on a shared server where others may or may not also be using some >> of the available licences at any given time.) Another possibility, if >> you >> are trying to launch a large number of parallel kernels, is that you are >> running into some kind of limitation on the number of concurrent TCP/IP >> connections. >> >> Other than that, it is likely platform-dependent, but you do not mention >> what platform you are using. Correctly setting up Windows >> client-to-Windows server parallel kernel operation is slightly more >> difficult than for the other platforms, for example. >> > > Thanks for the ideas. And you are right I should've mentioned the OS it's > running on. It's Linux (Debian Squeeze to be exact). > > I don't think it's a license issue since I can run on each node 4 > Mathematica Kernels without problem, the problem is making them process > in > parallel (meaning parallel remote kernels). > > This used to work just fine with mathematica7 (Over 20 kernels without > problem, now I can't get more than 10 in the best case) no idea what > could > have changed with mathematica8. > > I've tried manually running the kernels with the ssh command that is > shown > in the Parallel Kernel Configuration dialog without success (Link names > problems and such). If you could help me with this it would be very mu ch > appreciated since this could lead to solve the problem. > > Thanks again for your response. > I'm afraid I can't reproduce your problem--at least not on Xubuntu 10.04, where I can launch at least 24 subkernels via ssh without any difficulties. Perhaps a firewall or networking stack setting is limiting the number of simultaneous half-open TCP connections? Are you able to start all of the kernels if you launch them a few at a time, e.g. using LaunchKernels[ {SubKernels`RemoteKernels`RemoteMachine["hostname", 4]} ] with the hostname of one of the nodes being substituted at each iteration? Alternatively, if the nodes are heavily loaded and take some time to start the kernels, you may run into the MathLink timeout of 15 seconds. Starting fewer kernels at once may also help in this situation. >> On Fri, 29 Jul 2011 09:45:19 +0100, Iv=E1n Pulido Sanchez >> <ijpulido.s at gmail.com> wrote: >> >> > Hello, >> > >> > When I try to configure remote kernels in Mathematica via >> > Evaluation>Parallel Kernel Configuration ... then I go to "Remote >> > Kernels" >> > and add hosts, after that I try to Launch the remote kernels and only >> >> >> > some >> > of them get launched (the number of them varies),and finally I get a >> msg >> > like the following. >> > >> > KernelObject::rdead: Subkernel connected through remote[nodo2] appears >> > dead. >> >>> LinkConnect::linkc: Unable to connect to >> >>> LinkObject[36154 at 192.168.1.104, >> > 49648 at 192.168.1.104,38,12]. >> General::stop: Further output of >> > LinkConnect::linkc will be suppressed during this calculation. >> >> > >> > Any ideas how to get this working? >> > >> > Take into account it sometimes does load some of the remote kernels >> but >> > never all of them. Thanks in advance I hope you can help me with this. From mathgroup-adm at smc.vnet.net Sun Jul 31 22:00:52 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 7BB316BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 22:00:52 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p7130rXQ005541; Sun, 31 Jul 2011 22:00:53 -0500 Received: from mx3.wolfram.com (puremessage-vm1.wolfram.com [140.177.205.140]) by mx4.wolfram.com (Postfix) with SMTP id 9B034BF47E; Sun, 31 Jul 2011 22:00:53 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 8EE00A80BA; Sun, 31 Jul 2011 22:00:51 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11356 for mathgroup-newout; Sun, 31 Jul 2011 23:36:26 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11352 for mathgroup-newsend; Sun, 31 Jul 2011 23:36:25 -0400 (EDT) Date: Sun, 31 Jul 2011 23:36:25 -0400 (EDT) Message-Id: <201108010336.XAA11352 at smc.vnet.net> From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> Subject: [mg120636] Re: Memory leak or flawed garbage collector References: <j0u7mo$fc1$1 at smc.vnet.net> <j10l01$os6$1 at smc.vnet.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.25122 On Sun, 31 Jul 2011 12:27:22 +0100, Alexey Popkov <lehin.p at gmail.com> wrote: > "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com> wrote: > news:j10l01$os6$1 at smc.vnet.net... >> Of course, it is quite possible that the references to your symbols >> responsible for their not being garbage-collected are somewhere other >> than >> the DownValues of In or Out, but if you find and remove these, you >> should >> find that the symbols are garbage-collected (unless for some reason they >> have had their Temporary attribute removed during the course of >> execution). If this does not occur after all references have been >> removed, >> then indeed a bug in the garbage collector would indeed be a >> possibility. > > There is a bug in the garbage collector (non-removing unreferenced > temporary > variables with their definitions): > > In[1]:= $HistoryLength=0; > a[b_]:=Module[{c,d},d:=9;d/;b===1]; > Length@Names[$Context<>"*"] > > Out[3]= 6 > > In[4]:= lst=Table[a[1],{1000}]; > Length@Names[$Context<>"*"] > > Out[5]= 1007 > > In[6]:= lst=. > Length@Names[$Context<>"*"] > > Out[7]= 1007 > > In[8]:= Definition@d$999 > > Out[8]= Attributes[d$999]={Temporary} > > d$999:=9 > > > This bug was originally reported in this MathGroup post: > http://forums.wolfram.com/mathgroup/archive/2010/Dec/msg00130.html Interesting. The bug does not manifest itself if Set is used instead of SetDelayed: In[1] := $HistoryLength=0; a[b_]:=Module[{c,d},d=9;d/;b===1]; Length@Names[$Context<>"*"] Out[3] = 6 In[4] := lst=Table[a[1],{1000}]; Length@Names[$Context<>"*"] Out[5] = 7 (* the new one is lst *) One may speculate that this is due to special treatment of delayed values. In a new session: In[1] := $HistoryLength=0; a[b_]:=Module[{c,d},d:=9;d/;b===1]; Length@Names[$Context<>"*"] Out[3] = 6 In[4] := a[1]; Names[$Context<>"*"] Out[5] = {"a", "b", "c", "c$", "d", "d$", "d$539"} In[6] := OwnValues[d$539] Out[6] = {HoldPattern[d$539] :> 9} In[7] := test = 1; OwnValues[test] (* for comparison *) Out[8] = {HoldPattern[test] :> 1} (* immediate values do not look any different to delayed values from this point of view. Delayed values may therefore be distinguished by an internal flag; the fact that the bug is not present for immediate values implies that it is the delayed values rather than the immediate ones that are subject to special treatment. *) So, let us try: In[9] := d$539 =.; Names[$Context <> "*"] Out[10] = {"a", "b", "c", "c$", "d", "d$", "test"} (* the symbol has now been garbage-collected *) From this we may surmise that values are not being cleared for symbols appearing in a Module that have gone out of scope if the delayed flag is set and if they have also been conditionally evaluated. It appears that these values are what is preventing garbage collection; therefore I would consider this as a bug in Module (in that it does not recognise when values have gone out of scope in all cases) rather than in the garbage collector itself. As reported in the original thread, the same behaviour is not evident with Block, which is logically equivalent to Module in this simple case. Block also does not need to create and maintain temporary symbols, and therefore offers better performance than Module; it seems that this kind of lexical scoping is merely emulated in Mathematica, with dynamic scoping fitting more naturally with the language semantics. For these reasons, unless I explicitly require the temporary symbols, I generally prefer Block in most simple cases, or With where lexical scoping is called for. From mathgroup-adm at smc.vnet.net Sun Jul 31 22:02:46 2011 Return-Path: <mathgroup-adm at smc.vnet.net> X-Original-To: l-mathgroup at mail-archive0.wolfram.com Delivered-To: l-mathgroup at mail-archive0.wolfram.com Received: from wolfram.com (mailhub.wolfram.com [140.177.10.16]) by mail-archive0.wolfram.com (Postfix) with ESMTP id 147D86BB18 for <l-mathgroup at mail-archive0.wolfram.com>; Sun, 31 Jul 2011 22:02:46 -0500 (CDT) Received: from mx4.wolfram.com (mx4.wolfram.com [140.177.205.144]) by wolfram.com (8.13.8/8.13.8) with ESMTP id p7132kDn005780; Sun, 31 Jul 2011 22:02:46 -0500 Received: from mx3.wolfram.com (puremessage-vm2.wolfram.com [140.177.205.141]) by mx4.wolfram.com (Postfix) with SMTP id E44CCBF417; Sun, 31 Jul 2011 22:02:45 -0500 (CDT) Received-SPF: none (smc.vnet.net: No applicable sender policy available) receiver=mx3; identity=mailfrom; envelope-from="mathgroup-adm at smc.vnet.net"; helo=smc.vnet.net; client-ip=66.193.208.85 Received: from smc.vnet.net (66-193-208-85.static.twtelecom.net [66.193.208.85]) by mx3.wolfram.com (Postfix) with ESMTP id 2A670A80BA; Sun, 31 Jul 2011 22:02:44 -0500 (CDT) Received: (from daemon@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11343 for mathgroup-newout; Sun, 31 Jul 2011 23:36:04 -0400 (EDT) Received: (from steve@localhost) by smc.vnet.net (8.8.8+Sun/8.8.8) id XAA11338 for mathgroup-newsend; Sun, 31 Jul 2011 23:36:03 -0400 (EDT) Date: Sun, 31 Jul 2011 23:36:03 -0400 (EDT) Message-Id: <201108010336.XAA11338 at smc.vnet.net> From: JAMES J A GOOCH JR <jamesgooch at verizon.net> Subject: [mg120634] Problems with matrices and clearing error messages Reply-To: JAMES J A GOOCH JR <jamesgooch at verizon.net> To: mathgroup at smc.vnet.net X-Wrienvfrom: <mathgroup-adm at smc.vnet.net> X-Wrienvto: <stevec at wolfram.com> X-Wrienvto: <marykab at wolfram.com> X-Wrienvto: <pratikd at wolfram.com> X-Wrienvto: <jjones at wolfram.com> X-Wrienvto: <jasonh at wolfram.com> X-Wrienvto: <dkapadia at wolfram.com> X-Wrienvto: <vminer at wolfram.com> X-Wrienvto: <jaebum at wolfram.com> X-Wrienvto: <ailingz at wolfram.com> X-Wrienvto: <carlson at wolfram.com> X-Wrienvto: <wandzura at wolfram.com> X-Wrienvto: <manojr at wolfram.com> X-Wrienvto: <darreng at wolfram.com> X-Wrienvto: <fredm at wolfram.com> X-Wrienvto: <larrya at wolfram.com> X-Wrienvto: <l-mathgroup at wolfram.com> X-Wrienvto: <jfklein at wolfram.com> X-Wrienvto: <brenton at wolfram.com> X-Wrienvto: <sgifford at wolfram.com> X-Wrienvto: <xwen at wolfram.com> X-Wrienvto: <andyr at wolfram.com> X-Wrienvto: <onkars at wolfram.com> X-Wrienvto: <ewort at wolfram.com> X-PMX-Version: 5.6.1.2065439, Antispam-Engine: 2.7.2.376379, Antispam-Data: 2011.8.1.25415 Hello: My name is James Gooch. I have a interest in math. at this time I am trying to solve nonsquare mateices. I also have a problem trying to clear error messages after I have cleared the equation. I am sorry that I cannot present the programs in attachments. Shown below are the programs that I have problems with: SOLVING SYSTEMS OF EQUATIONS A 3x 3 matrix m={{3,1,-1},{1,1,2},{-1,-2,3}} {{3,1,-1},{1,1,2},{-1,-2,3}} Create a function for solving the matrix equation mx=b f=LinearSolve[m] LinearSolveFunction[{3,3},<>] b[3,4,5] b[3,4,5] Find the solution x of m*x[3,4,5] {{3 Find of solution the x x[3,4,5],Find of solution the x x[3,4,5],-Find of solution the x x[3,4,5]},{Find of solution the x x[3,4,5],Find of solution the x x[3,4,5],2 Find of solution the x x[3,4,5]},{-Find of solution the x x[3,4,5],-2 Find of solution the x x[3,4,5],3 Find of solution the x x[3,4,5]}} f[{3,4,5}][Solution] {32/17,-(18/17),27/17}[Solution] [x=1.8,y=-1,z=1.6] Det[{{3,1,-1},{1,1,2},{-1,-2,3}}] 17 ________________________________________________________________________ A3 x 3 Matrix m={{4,-2,1},{2,3,-4},{1,1,2}} {{4,-2,1},{2,3,-4},{1,1,2}} Create a function for solving the matrix equation mx=b f=LinearSolve[m] LinearSolveFunction[{3,3},<>] LinearSolveFunction[{3,3},"<>"] b[6,8,2] b[6,8,2] Find the solution x of m*x[6,8,2] {{4 Find of solution the x x[6,8,2],-2 Find of solution the x x[6,8,2],Find of solution the x x[6,8,2]},{2 Find of solution the x x[6,8,2],3 Find of solution the x x[6,8,2],-4 Find of solution the x x[6,8,2]},{Find of solution the x x[6,8,2],Find of solution the x x[6,8,2],2 Find of solution the x x[6,8,2]}} f[{6,8,2}][Solution] {2,4/5,-(2/5)}[Solution] [i=2,j=.8,k=-.4] Det[{{4,-2,1},{2,3,-4},{1,1,2}}] 55 ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ _ A 4x 4 Matrix m={{3,2,-1,2},{1,1,2,-1},{5,-3,4,-5},{1,1,1,1}} {{3,2,-1,2},{1,1,2,-1},{5,-3,4,-5},{1,1,1,1}} Create a function for solving the matrix equation mx=b f=LinearSolve[m] LinearSolveFunction[{4,4},<>] LinearSolveFunction[{4,4},"<>"] LinearSolveFunction[{4,4},<>] b[10,8,-6,4] b[10,8,-6,4] Find the solution x of m*x[10,8,-6,4] {{3 Find of solution the x x[10,8,-6,4],2 Find of solution the x x[10,8,-6,4],-Find of solution the x x[10,8,-6,4],2 Find of solution the x x[10,8,-6,4]},{Find of solution the x x[10,8,-6,4],Find of solution the x x[10,8,-6,4],2 Find of solution the x x[10,8,-6,4],-Find of solution the x x[10,8,-6,4]},{5 Find of solution the x x[10,8,-6,4],-3 Find of solution the x x[10,8,-6,4],4 Find of solution the x x[10,8,-6,4],-5 Find of solution the x x[10,8,-6,4]},{Find of solution the x x[10,8,-6,4],Find of solution the x x[10,8,-6,4],Find of solution the x x[10,8,-6,4],Find of solution the x x[10,8,-6,4]}} f[{10,8,-6,4}][Solution] {3/5,61/10,-(7/15),-(67/30)}[Solution] a=.6,b=6.1,c=-.4666,d=2.2333 Det[{{1,1,2,-1},{1,1,1,1},{3,2,-1,2},{5,-3,4,-5}}] -60 ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ A 5X5 Matrix m={{1,1,2,1,-1},{-2,3,-4,3,1},{3,1,1,4,5},{1,5,3,5,6},{4,-1,4,-6,8}} {{1,1,2,1,-1},{-2,3,-4,3,1},{3,1,1,4,5},{1,5,3,5,6},{4,-1,4,-6,8}} Create a function for solving the matrix equation mx=b f=LinearSolve[m] LinearSolveFunction[{5,5},<>] b[8,7,10,12,2] b[8,7,10,12,2] Find the solution x of m*x[8,7,10,12,2] b[8,7,10,12,2] {{Find of solution the x x[8,7,10,12,2],Find of solution the x x[8,7,10,12,2],2 Find of solution the x x[8,7,10,12,2],Find of solution the x x[8,7,10,12,2],-Find of solution the x x[8,7,10,12,2]},{-2 Find of solution the x x[8,7,10,12,2],3 Find of solution the x x[8,7,10,12,2],-4 Find of solution the x x[8,7,10,12,2],3 Find of solution the x x[8,7,10,12,2],Find of solution the x x[8,7,10,12,2]},{3 Find of solution the x x[8,7,10,12,2],Find of solution the x x[8,7,10,12,2],Find of solution the x x[8,7,10,12,2],4 Find of solution the x x[8,7,10,12,2],5 Find of solution the x x[8,7,10,12,2]},{Find of solution the x x[8,7,10,12,2],5 Find of solution the x x[8,7,10,12,2],3 Find of solution the x x[8,7,10,12,2],5 Find of solution the x x[8,7,10,12,2],6 Find of solution the x x[8,7,10,12,2]},{4 Find of solution the x x[8,7,10,12,2],-Find of solution the x x[8,7,10,12,2],4 Find of solution the x x[8,7,10,12,2],-6 Find of solution the x x[8,7,10,12,2],8 Find of solution the x x[8,7,10,12,2]}} f[{8,7,10,12,2}] {5258/899,4423/899,-(3357/1798),-(1153/1798),-(2889/1798)} Print[a=5.85,b=4.91,c=-1.87,d=-.641,e=-1.61] {5258/899,4423/899,-(3357/1798),-(1153/1798),-(2889/1798)} 5.85 4.91 -1.87 -0.641 -1.61 Det[{{1,1,2,1,-1},{-2,3,-4,3,1},{3,1,1,4,5},{1,5,3,5,6},{4,-1,4,-6,8}}] -1798 Syntax::sntxi: Incomplete expression; more input is needed. Syntax::tsntxi: "[a=5.85,b=4.92,c=-.186,d=-.641,e=-1.61]" is incomplete; more input is needed. Syntax::sntxb: Expression cannot begin with "[a=5.85,b=4.92,c=-.186,d=-.641,e=-1.61] ". Syntax::sntxb: Expression cannot begin with "[a=5.85,b=4.92,c=-.186,d=-.641,e=-1.61] ". Syntax::sntxi: Incomplete expression; more input is needed. Syntax::tsntxi: "Det." is incomplete; more input is needed. Syntax::sntxi: Incomplete expression; more input is needed. Syntax::tsntxi: "Det." is incomplete; more input is needed. Syntax::tsntxi: "Det." is incomplete; more input is needed. Syntax::sntxi: Incomplete expression; more input is needed. Here is the non square matrix A SYSTEM OF EQUATIONS SOLVING ESENTIAL ENERGY PARTICLES { {, } } { {u, 2c, 3t}, {d, s, 5b}, {νe, νμ, 2 νÏ?}, {e, 5μ, 3Ï?} } A3x4 Matrix m={{1,2,3,0},{1,1,5,0},{1,1,2,0},{1,5,3,0}} {  {  } } A4x4 Matrix {{1,2,3,0},{1,1,5,0},{1,1,2,0},{1,5,3,0}} {{Null}} {{1,2,3},{1,1,5},{1,1,2},{1,5,3}} {{1,2,3},{1,1,5},{1,1,2},{1,5,3}} b {1,2,3,4} {b,2 b,3 b,4 b} LinearPrograming {{1,2,3},{1,1,5},{1,1,2},{1,5,3}} {{LinearPrograming,2 LinearPrograming,3 LinearPrograming},{LinearPrograming,LinearPrograming,5 LinearPrograming},{LinearPrograming,LinearPrograming,2 LinearPrograming},{LinearPrograming,5 LinearPrograming,3 LinearPrograming}} Find the solutionx of m*x[1,2,3,4] {{Find of solutionx the x[1,2,3,4],2 Find of solutionx the x[1,2,3,4],3 Find of solutionx the x[1,2,3,4],0},{Find of solutionx the x[1,2,3,4],Find of solutionx the x[1,2,3,4],5 Find of solutionx the x[1,2,3,4],0},{Find of solutionx the x[1,2,3,4],Find of solutionx the x[1,2,3,4],2 Find of solutionx the x[1,2,3,4],0},{Find of solutionx the x[1,2,3,4],5 Find of solutionx the x[1,2,3,4],3 Find of solutionx the x[1,2,3,4],0}} Det::nonopt: Options expected (instead of {1,5,3}) beyond position 1 in Det[{1,2,3},{1,1,5},{1,1,2},{1,5,3}]. An option must be a rule or a list of rules. >> LinearSolve::nosol: Linear equation encountered that has no solution. >> b[2,3,4,1] b[2,3,4,1] A 0x1 Matrix 0 {{1,2,3},{1,1,5},{1,1,2},{1,5,3}} {{1,2,3},{1,1,5},{1,1,2},{1,5,3}} Find the solution x of m*x {{Find of solution the x2,2 Find of solution the x2,3 Find of solution the x2},{Find of solution the x2,Find of solution the x2,5 Find of solution the x2},{Find of solution the x2,Find of solution the x2,2 Find of solution the x2},{Find of solution the x2,5 Find of solution the x2,3 Find of solution the x2}} LinearSolve::nosol: Linear equation encountered that has no solution. >> LinearSolveFunction[{4,3},<>][{2,3,4,1}] My email address is: jamesgooch at verizon.net James Gooch 40 Beaumont Road Silver Spring, MD 20904