Thank you sea for nice code , here is an awk form of same. Honestly speaking got the idea from your code and tried to make it in awk,
lets have little more fun.
Code:
awk 'BEGIN {INPUT_NUMBERS = split("1990 2008 1666",arr," ")
for (i=1; i<=INPUT_NUMBERS; i++) {
X = arr[i]
printf("%s = %s\n",X,ROMAN(X))
}
exit(0)
}
function ROMAN(number,Z,Y,A,B,rom1,rom10,rom100,rom1000) {
number = int(number)
if (number < 1 || number > 3999)
{
return
}
split("I II III IV V VI VII VIII IX",rom1," ")
split("X XX XXX XL L LX LXX LXXX XC",rom10," ")
split("C CC CCC CD D DC DCC DCCC CM",rom100," ")
split("M MM MMM",rom1000," ")
Z = (number - (number % 1000)) / 1000
number = number % 1000
Y = (number - (number % 100)) / 100
number = number % 100
A = (number - (number % 10)) / 10
B = number % 10
return(rom1000[Z] rom100[Y] rom10[A] rom1[B])
}'
Output will be as follows.
Code:
1990 = MCMXC
2008 = MMVIII
1666 = MDCLXVI
Thanks,
R. Singh
This User Gave Thanks to RavinderSingh13 For This Post:
How do I check if a variable consisted of letters, numbers or both letters and numbers?
For example, I have a variable $X and I want to print "1" if it contains only letters, "2" if it contains only numbers and "3" if it contains both (2 Replies)
Hello all I am a unix newbie....
I have a sun netra t1 and it is freaking out
I am connected to it through a console port, and it is just spitting out a ton on numbers and letters like below its just keeps going and going.
I have tried rebooting it and I cannot get it back to any kind of a... (1 Reply)
If I have a set of strings,
C21
F231
H42
1C10
1F113
and I want to isolate the ints following the char, what would the sed string be to find numbers after letters?
If I do,
*, I will get numbers after letters, but I am looking to do something like,
sed 's/*/\t*/g'
this will give me... (14 Replies)
If I use ls to print all the files of a folder, is there a way to sort using roman numerals?
I am thinking about a result like:
benjamin_I.wmv
benjamin_II.wmv
benjamin_II.wmv
benjamin_III.wmv
benjamin_IV.wmv
benjamin_V.wmv
benjamin_VI.wmv
benjamin_VII.wmv
benjamin_VIII.wmv... (6 Replies)
Hi,
I columns with both number and letters however i need the number 4 trimmed off the lines that have 3 numbers in them so it just because the 2 preceding numbers only
For example
V25QG2-K18QG-V25CG2
L26HG-L17HA-L26CG
I434QD1-L19HB2-I434CD1
I434QD1-A31QB-I434CD1 ... (7 Replies)
Hello all. I am a beginner UNIX user who is using UNIX to work on a bioinformatics project for my university.
I have a bit of a complicated issue in trying to use sed (or awk) to "find and replace" bases (letters) in a genetics data spreadsheet (converted to a text file, can be either... (3 Replies)
Hi Experts,
I am finding difficulty to get exact match:
file
OPERATING_SYSTEM=HP-UX
LOOPBACK_ADDRESS=127.0.0.1
INTERFACE_NAME="lan3"
IP_ADDRESS="10.53.52.241"
SUBNET_MASK="255.255.255.192"
BROADCAST_ADDRESS=""
INTERFACE_STATE=""
DHCP_ENABLE=0
INTERFACE_NAME="lan3:1"... (6 Replies)
Hello,
I have a file such as this:
chr1
chr2
chr1
chr2
chr3
chr10
chr4
chr5
chrz
chr1AI want to sort it, I use this command:
sort -k1 -th -n testfilebut I get this output, how can I fix this?
chr1
chr1
chr10
chr1A
chr2
chr2 (3 Replies)
I have a file with hundreds of lines in it. I wanted to extract anything that matches the following:
KR followed by 4 digits:
example KR1201
cat list | sed "s///g"
Is the closest I've come, and obviously it is not what I want. This would remove all of the items that I want and leave me... (2 Replies)
Hi!
I found and then adapt the code for my pipeline...
awk -F"," -vOFS="," '{printf "%0.2f %0.f\n",$2,$4}' xxx > yyy
I add -F"," -vOFS="," (for input and output as csv file) and I change the columns and the number of decimal...
It works but I have also some problems... here my columns
... (7 Replies)
12-09-2014
, here is an awk form of same. Honestly speaking got the idea from your code and tried to make it in awk,