03-21-2011
Hi vgersh99 and all,
Thank you for your help. The solution you gave works well, just a small problem I am not able to solve and have tried to do this by mysellf as a way to learn more how to use awk. but over a week now I can solve this. The problem is the solution above fails if the number just before or just before the negative numbers is 0.00. see the data
Here the data and see what happens
Quote:
2.91 -1.19 1.34 78.00 2.00
3.09 -1.21 1.33 91.00 2.00
3.28 -1.03 1.41 87.00 2.00
3.47 -0.78 1.48 86.00 2.00
3.66 -0.47 1.51 86.00 2.00
3.84 0.00 1.42 88.00 2.00
4.03 0.47 1.15 85.00 2.00
4.22 0.93 0.45 87.00 2.00
4.41 1.00 0.00 87.00 1.00
4.59 1.00 0.00 87.00 1.00
4.78 1.00 0.00 87.00 1.00
4.97 1.00 0.00 84.00 1.00
5.16 1.00 0.00 88.00 1.00
5.34 1.00 0.00 86.00 1.00
8.53 1.00 0.00 86.00 1.00
8.72 1.00 0.00 87.00 1.00
8.91 1.00 0.00 78.00 1.00
9.09 1.00 0.00 91.00 1.00
9.28 1.00 0.00 87.00 1.00
9.47 1.00 0.00 86.00 1.00
9.66 1.00 0.00 86.00 1.00
9.84 1.00 0.00 88.00 1.00
10.03 0.00 1.09 85.00 2.00
10.22 -0.86 1.46 87.00 2.00
10.41 -1.86 0.63 87.00 2.00
10.59 -1.76 0.82 87.00 2.00
10.78 -0.83 1.47 87.00 2.00
10.97 0.07 1.40 84.00 2.00
11.16 0.80 0.76 88.00 2.00
11.34 1.00 0.00 86.00 1.00
See how this fails to give the correct result as when the data is as given in my initial post.
I have been thinking a solution would be to use some if statement but I have not managed to find a way to use an iff statement in this case.
I sincerely appreciate you assistance.
Thank you
Malandisa
9 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi Gurus,
In my file I have an amount field from position 74 to 87, which contains values starting with '+' as well as '-'. I want to add all positive values in a varible called "CREDIT" and all negative values in a variable "DEBIT". I know, we can use grep to identify values with positive and... (4 Replies)
Discussion started by: berlin_germany
4 Replies
2. Shell Programming and Scripting
Hello,
For my weather station I have made a little perl script to put the data into cacti. The next problem I have.
I can only get positive numbers or negative numbers.
What do I do:
Though a shell scrip I call the perl script.
Shell script:
#!/bin/sh
cat data.txt | stats.pl
Perl... (4 Replies)
Discussion started by: rbl-blacklight
4 Replies
3. Shell Programming and Scripting
Hi,
I have a file that looks like this:
Jake 2 3 4 6 4 3 -2 -1
Jerry 1 2 3 2 1 7 -6 -1
Timmy -1 -4 -5 -8 9 3 1
I want to find the most positive and negative value for each row and also define its position (based on column #)
So the output would look... (7 Replies)
Discussion started by: gisele_l
7 Replies
4. Shell Programming and Scripting
Hello,
I have a list like this :
1
2
-4
0
-3
-7
5
6 etc.
Is there a way to remove all the positive values and print only the negative values, without using grep, sed or awk?
Thanks,
Prasanna (4 Replies)
Discussion started by: prasanna1157
4 Replies
5. Shell Programming and Scripting
Let, I have three numbers
+00123.25
-00256.54
+00489.23
I need to sum up all those three numbers, after storing them in three variables (say var1, var2, var3).
I used both expr and BC, but they didn't work for me.
But, I am not able to sum up them, as I don't have any idea how to... (13 Replies)
Discussion started by: mady135
13 Replies
6. Shell Programming and Scripting
Hello all,
I'm new to the forums and hope to be able to contribute something useful in the future; however I must admit that what has prompted me to join is the fact that currently I need help with something that has me at the end of my tether.
I have a PDB (Protein Data Bank) file which I... (13 Replies)
Discussion started by: crunchgargoyle
13 Replies
7. Shell Programming and Scripting
Dear All,
I have to split a tab delimited file in two files based on the presence of a positive or negative in column number 9 , for example
file:
A 1 5 erg + 6766 0.9889 0.9817 9.01882 erg inside upstream
B 1 8 erg2 + 6766 0.9889 0.9817 -9.22 erg2 inside... (3 Replies)
Discussion started by: paolo.kunder
3 Replies
8. UNIX for Beginners Questions & Answers
Hi ALL,
I am having semi column separated file as below. I am having negative values for the records starting with 11095. How can I convert that positive number
I tried this below seems not working
sed 's/ \(*\)$/ -\1/;t;s/\(.*\)-/\1/ myfile
myfile... (6 Replies)
Discussion started by: arunkumar_mca
6 Replies
9. UNIX for Beginners Questions & Answers
I have a file that is pipe delimited and in Column F they have number values, both positive and negative. I need to take the one file I am starting with and split it into two separate files based on negative and positive numbers. What is the command to do so? And then I need to also transfer... (4 Replies)
Discussion started by: cckaiser15
4 Replies
DGELS(l) ) DGELS(l)
NAME
DGELS - solve overdetermined or underdetermined real linear systems involving an M-by-N matrix A, or its transpose, using a QR or LQ fac-
torization of A
SYNOPSIS
SUBROUTINE DGELS( TRANS, M, N, NRHS, A, LDA, B, LDB, WORK, LWORK, INFO )
CHARACTER TRANS
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
DOUBLE PRECISION A( LDA, * ), B( LDB, * ), WORK( * )
PURPOSE
DGELS solves overdetermined or underdetermined real linear systems involving an M-by-N matrix A, or its transpose, using a QR or LQ factor-
ization of A. It is assumed that A has full rank. The following options are provided:
1. If TRANS = 'N' and m >= n: find the least squares solution of
an overdetermined system, i.e., solve the least squares problem
minimize || B - A*X ||.
2. If TRANS = 'N' and m < n: find the minimum norm solution of
an underdetermined system A * X = B.
3. If TRANS = 'T' and m >= n: find the minimum norm solution of
an undetermined system A**T * X = B.
4. If TRANS = 'T' and m < n: find the least squares solution of
an overdetermined system, i.e., solve the least squares problem
minimize || B - A**T * X ||.
Several right hand side vectors b and solution vectors x can be handled in a single call; they are stored as the columns of the M-by-NRHS
right hand side matrix B and the N-by-NRHS solution matrix X.
ARGUMENTS
TRANS (input) CHARACTER
= 'N': the linear system involves A;
= 'T': the linear system involves A**T.
M (input) INTEGER
The number of rows of the matrix A. M >= 0.
N (input) INTEGER
The number of columns of the matrix A. N >= 0.
NRHS (input) INTEGER
The number of right hand sides, i.e., the number of columns of the matrices B and X. NRHS >=0.
A (input/output) DOUBLE PRECISION array, dimension (LDA,N)
On entry, the M-by-N matrix A. On exit, if M >= N, A is overwritten by details of its QR factorization as returned by DGEQRF; if M
< N, A is overwritten by details of its LQ factorization as returned by DGELQF.
LDA (input) INTEGER
The leading dimension of the array A. LDA >= max(1,M).
B (input/output) DOUBLE PRECISION array, dimension (LDB,NRHS)
On entry, the matrix B of right hand side vectors, stored columnwise; B is M-by-NRHS if TRANS = 'N', or N-by-NRHS if TRANS = 'T'.
On exit, B is overwritten by the solution vectors, stored columnwise: if TRANS = 'N' and m >= n, rows 1 to n of B contain the least
squares solution vectors; the residual sum of squares for the solution in each column is given by the sum of squares of elements
N+1 to M in that column; if TRANS = 'N' and m < n, rows 1 to N of B contain the minimum norm solution vectors; if TRANS = 'T' and m
>= n, rows 1 to M of B contain the minimum norm solution vectors; if TRANS = 'T' and m < n, rows 1 to M of B contain the least
squares solution vectors; the residual sum of squares for the solution in each column is given by the sum of squares of elements
M+1 to N in that column.
LDB (input) INTEGER
The leading dimension of the array B. LDB >= MAX(1,M,N).
WORK (workspace/output) DOUBLE PRECISION array, dimension (LWORK)
On exit, if INFO = 0, WORK(1) returns the optimal LWORK.
LWORK (input) INTEGER
The dimension of the array WORK. LWORK >= max( 1, MN + max( MN, NRHS ) ). For optimal performance, LWORK >= max( 1, MN + max( MN,
NRHS )*NB ). where MN = min(M,N) and NB is the optimum block size.
If LWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this
value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA.
INFO (output) INTEGER
= 0: successful exit
< 0: if INFO = -i, the i-th argument had an illegal value
LAPACK version 3.0 15 June 2000 DGELS(l)