User Portlet
Discussions |
---|
If tri was a lower triangular n x n matrix, how about: Array[If[#1 > #2, tri[[#1, #2]], tri[[#2, #1]]] &, {n, n}]You are still copying, but maybe with less code. If this looked cryptic, then you'd probably like to check these... |
I believe to understand that you have a list from which you would like to remove list elements containing a Null in a certain position. DeleteCases with a suitable pattern should be able to help you there, e.g.: [mcode]In[1]:= list = {{a,}, {b, c}} ... |
From the FullForm you have seen that your expression is essentially Grid@List@List. To work with the values you need to remove the Grid, probably best by using the Part function. E.g. to compute the determinant of a random 4x4 matrix placed in a... |
Throwing out some probably obvious observations: The driving forces in the 'dancing clouds' seem to be buddy cliques, where all members of such a subset of dancers are friends with one another; the 'cloud tails' are chains of followers where one... |
Vardo, if I understand correctly, then after plotting x[ t ] of your dataxexp = {.21, .25, .3}; texp = {0, 1000, 2000}; ListLinePlot[Transpose@{texp, xexp}]you would now like to plot t[ x ] :[mcode]ListLinePlot[(Transpose[{texp,... |
Marek, is this close to what you are trying to do:[mcode]In[1]:= pom2 = {"{0, 90012}", "{0, 90013}", "{0, 90016}", "{0, 90022}", "{0, 90034}", "{0, 90042}", "{0, 90102}", "{0, 90106}", "{0, 90115}", "{0, 90131}", "{0, 90132}", "{0,... |
I'm an amateur to Laplace transforms, but it looks to me that you can express your eventual solution in terms of integrals of typeLaplaceTransform[Gamma[m, C x^(1/n)], x, z]with various m, C, and n. Assuming that your n's are positive... |
Pretty much any system that you can express as a system of ordinary differential equations you can simulate in SystemModeler. For a simple system like this one you can alternatively use Mathematica. Hope this helps, Peter |
Panagiotis, could you please directly provide the eqns and vars you would like to use in your NDSolve evaluation? With the code as currently given above I cannot even reproduce the exact error message you are showing, and the eqns I get are not... |
I'm noting that the expression Sign == Sign[r - s] in cond1 doesn't make sense, according to your reference it's a typo (Sign -> Sign[ s ] ). Is all the remaining code as desired? |