The inner product <x,y> of real vectors x, y in Rn is defined as <x,y> = sum(i in 1:n | xi . yi)
Let UV be the matrix of a two-mode network N = ((U,V), L, w): UV[u,v] = w(u,v) if (u,v) in L, and 0 otherwise.
> wdir <- "C:/Users/vlado/DL/data/2-mode/Manly+Alberto"
> setwd(wdir)
> library(ComplexHeatmap)
> library(circlize)
> dataF <- "https://raw.githubusercontent.com/bavla/NormNet/main/data/Manly%26Alberto/EuProtein.csv"
> P <- read.csv(dataF,sep=",",skip=5,head=TRUE,row.names=1)
> dim(P)
[1] 22 18
> P
RM WM EGG MLK FSH CRL SCH PNO F.V AGR MIN MAN PS CON SER FIN SPS TC
Albania 10 1 1 9 0 42 1 6 2 55.5 19.4 0.0 0.0 3.4 3.3 15.3 0.0 3.0
Austria 9 14 4 20 2 28 4 1 4 7.4 0.3 26.9 1.2 8.5 19.1 6.7 23.3 6.4
Belgium 14 9 4 18 5 27 6 2 4 2.6 0.2 20.8 0.8 6.3 16.9 8.7 36.9 6.8
Bulgaria 8 6 2 8 1 57 1 4 4 19.0 0.0 35.0 0.0 6.7 9.4 1.5 20.9 7.5
Denmark 11 11 4 25 10 22 5 1 2 5.6 0.1 20.4 0.7 6.4 14.5 9.1 36.3 7.0
Finland 10 5 3 34 6 26 5 1 1 8.5 0.2 19.3 1.2 6.8 14.6 8.6 33.2 7.5
France 18 10 3 20 6 28 5 2 7 5.1 0.3 20.2 0.9 7.1 16.7 10.2 33.1 6.4
Greece 10 3 3 18 6 42 2 8 7 22.2 0.5 19.2 1.0 6.8 18.2 5.3 19.8 6.9
Hungary 5 12 3 10 0 40 4 5 4 15.3 28.9 0.0 0.0 6.4 13.3 0.0 27.3 8.8
Ireland 14 10 5 26 2 24 6 2 3 13.8 0.6 19.8 1.2 7.1 17.8 8.4 25.5 5.8
Italy 9 5 3 14 3 37 2 4 7 8.4 1.1 21.9 0.0 9.1 21.6 4.6 28.0 5.3
The_Netherlands 10 14 4 23 3 22 4 2 4 4.2 0.1 19.2 0.7 0.6 18.5 11.5 38.3 6.8
Norway 9 5 3 23 10 23 5 2 3 5.8 1.1 14.6 1.1 6.5 17.6 7.6 37.5 8.1
Poland 7 10 3 19 3 36 6 2 7 23.6 3.9 24.1 0.9 6.3 10.3 1.3 24.5 5.2
Portugal 6 4 1 5 14 27 6 5 8 11.5 0.5 23.6 0.7 8.2 19.8 6.3 24.6 4.8
Romania 6 6 2 11 1 50 3 5 3 22.0 2.6 37.9 2.0 5.8 6.9 0.6 15.3 6.8
Spain 7 3 3 9 7 29 6 6 7 9.9 0.5 21.1 0.6 9.5 20.1 5.9 26.7 5.8
Sweden 10 8 4 25 8 20 4 1 2 3.2 0.3 19.0 0.8 6.4 14.2 9.4 39.5 7.2
Switzerland 13 10 3 24 2 26 3 2 5 5.6 0.0 24.7 0.0 9.2 20.5 10.7 23.1 6.2
United_Kingdom 17 6 5 21 4 24 5 3 3 2.2 0.7 21.3 1.2 7.0 20.2 12.4 28.4 6.5
USSR_(former) 9 5 2 17 3 44 6 3 3 18.5 0.0 28.8 0.0 10.2 7.9 0.6 25.6 8.4
Yugoslavia_(former) 4 5 1 10 1 56 3 6 3 5.0 2.2 38.7 2.2 8.1 13.8 3.1 19.1 7.8
>