SAS画社会网络分析图

《SAS画社会网络分析图》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、/*Definethepathtothearchivefile,theHTMLoutputfile,andtheSASlibrary*/%letjarfiles=path-to-archive-files;%lethtmlfile=html-filename.htm;%letlib=WORK;/*puteverythingintheWORKlibrary*//*Definethenodenamesandlocations.*/data&lib..regions;lengthregionName$80/*Nodetextlabel*/r

2、egionId$4/*Nodeidentifyingstring*/xLocyLoc8;/*Pixelpositionofnode*/inputregionIDxLocyLocreserveRegionName$&;cards;PNW30308.5WesternSystemsCoordinatingCouncil-PacificNorthwestNWPE100608.5WesternSystemsCoordinatingCouncil-NorthwestPowerPoolEastCALI402209.5WesternSystemsCo

3、ordinatingCouncil-CaliforniaRMPA14018010.8WesternSystemsCoordinatingCouncil-RockyMountainPowerAreaAZNM11031012.9WesternSystemsCoordinatingCouncil-AZNMSNVMAPP1808015Mid-continentAreaPowerPoolSPPN18520013.6SouthwestPowerPool-NorthSPPS17027013.6SouthwestPowerPool-SouthERCT

4、18040015ElectricReliabilityCouncilofTexasWUMS2709017Wisconsin-UpperMichiganMANO29024017Mid-AmericaInterconnectedNetwork-SouthENTG29036012.4EntergyMECS35013015MichiganElectricCoordinationSystemECAO36020015EastCentralAreaReliabilityCoordinationAgreement-SouthTVA36030012.4

5、TennesseeValleyAuthoritySOU39040012.4SouthernCompanyFRCC42046015FloridaReliabilityCoordinatingCouncilVACA45034012.4VirginiaandCarolinasMACS46028019Mid-AtlanticAreaCouncil-SouthMACE49523519Mid-AtlanticAreaCouncil-EastMACW43022019Mid-AtlanticAreaCouncil-WestUPNY45016018Up

6、stateNewYorkDSNY50017018DownstateNewYorkNYC53020018NewYorkCityLILC57017018LongIslandLightingCompanyNENG5709018NewEnglandPowerPool;run;/*Definethenodeconnections.*/data&lib..links;lengthfromto$4ltip$12lcolor$8;formatcapacitycomma.;inputfromtocapacity;lcolor="#BBBBBB";/*L

7、ightgraylines*/ltip=left(put(capacity,comma.)

8、

9、"MW");/*Definethetooltips*/ifcapacity<500thenwidth=1;/*Definethelinewidths*/elseifcapacity<1000thenwidth=2;elseifcapacity<2000thenwidth=3;elseifcapacity<3000thenwidth=4;elsewidth=5;cards;MECSECAO2250ECAOMECS2250ECAOMACW2957

10、ECAOMANO1655ECAOTVA1890ECAOVACA2334ERCTSPPS635MACEMACW1500MACEDSNY1130MACSMACW1800MACSVACA3075MACWECAO2612MACW