复杂网络邻接矩阵转pajek网络文件matlab程序

% Converts an adjacency matrix representation to a Pajek .net read format
% INPUT: an adjacency matrix nxn a filename string format node coordinates （optional）
% OUTPUT: text format of Pajek readable .net file in the same directory
% EXAMPLE
% *Vertices    4
%        1 “v1“                                     0.1000    0.5000    0.5000
%        2 “v2“                                     0.1000    0.4975    0.5000
%        3 “v3“                                     0.1000    0.4950    0.5000
%        4 “v4“                                     0.1001    0.4925    0.5000
% *Edges
%       14       31 1 
%       46       51 1 
%       51       60 1 
% Gergana Bounova October 7 2009

% Note: to add node names add one additional input variable the list of
% names indexed 1 through n either vector or cell.

function []=adj2pajek（adjfilenamexyz）

n = n