Вы можете искать по имени процесса. А затем посмотреть на сокеты домена unix (возможно, абстрактные), открытые процессом, чтобы определить номер дисплея.
pid=$(pgrep -xt "$tty" Xorg) &&
lsof -aUp "$pid" | sed '\|.*X11-unix/X\([0-9]\{1,\}\) .*|!d;s//\1/;q'
Этот lsof
придется запускать от имени root.
Или вы можете извлечь номер дисплея из аргументов командной строки, если он всегда там:
pgrep -axt "$tty" Xorg | sed -n 's/.*:\([0-9]\{1,\}\).*/\1/p'
Чтобы напечатать только верхние треугольные значения в соответствии с желаемым результатом
awk '
NR==1 {
split($0,hdr," "); next
}
{
for (i=NR;i<=NF;i++) {print $1 FS hdr[i] FS $i}
}
' file
snp1 snp1 1
snp1 snp2 0.3
snp1 snp3 0.4
snp1 snp4 0.5
snp2 snp2 1
snp2 snp3 0.4
snp2 snp4 0.5
snp3 snp3 1
snp3 snp4 0.5
snp4 snp4 1
или эквивалентным образом, с помощью perl
perl -alne '
if ($. == 1) {
@hdr = @F;
} else {
for $i ($.-1 .. $#F) {
print join " ", $F[0], $hdr[$i], @F[$i];
}
}' file
Если вам нужна полная матрица, а не только верхний треугольник , затем измените начальный индекс цикла for
, заменив NR
(в версии awk) на 2
или $ .- 1
] (в версии perl) на 1
Сейчас ограничений нет.
#!/bin/bash
INPUT=File1
declare -a fields
fields=( $(head -n1 "$INPUT") )
i=0
while read -r line; do
values=( $line )
for ((j=++i; j<${#values[@]}; j++)); do
echo -e "${fields[$i]}" "${fields[$j]}"'\t'"${values[$j]}"
done
done < <( tail -n+2 "$INPUT")
Это должно быть легко с помощью awk
.
$ awk -f script.awk file1.txt
snp1 snp1 1
snp1 snp2 0.3
snp1 snp3 0.4
snp1 snp4 0.5
snp2 snp1 0.3
snp2 snp2 1
snp2 snp3 0.4
snp2 snp4 0.5
snp3 snp1 0.4
snp3 snp2 0.4
snp3 snp3 1
snp3 snp4 0.5
snp4 snp1 0.5
snp4 snp2 0.5
snp4 snp3 0.5
snp4 snp4 1
Содержание script.awk
. Пропускаем первую строку и форматируем остальные по желанию.
$ cat script.awk
{
if (NR == 1) next;
print $1" snp1 "$2;
print $1" snp2 "$3;
print $1" snp3 "$4;
print $1" snp4 "$5;
}
Содержание file1.txt
$ cat test.txt
____ snp1 snp2 snp3 snp4
snp1 1 0.3 0.4 0.5
snp2 0.3 1 0.4 0.5
snp3 0.4 0.4 1 0.5
snp4 0.5 0.5 0.5 1
Таким образом, вы можете перенаправить вывод в новый файл.
awk -f script.awk file1.txt > file2.txt