Skip to content

Commit

Permalink
version 0.1.0
Browse files Browse the repository at this point in the history
  • Loading branch information
Brahim Brahim authored and gaborcsardi committed Jun 6, 2013
0 parents commit ebe8797
Show file tree
Hide file tree
Showing 23 changed files with 1,379 additions and 0 deletions.
15 changes: 15 additions & 0 deletions DESCRIPTION
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@
Package: GPCSIV
Type: Package
Title: GPCSIV, Generalized Principal Component of Symbolic Interval
variables
Version: 0.1.0
Date: 2013-06-06
Author: Brahim Brahim and Sun Makosso-Kallyth <sun.makosso-kallyth@crchuq.ulaval.ca>
Maintainer: Brahim Brahim <brahim.brahim@bigdatavisualizations.com>
Description: This package implements an extension of principal component analysis (PCA) tailored to handle multiple data tables. It can handle Big Data in the sense that the variation in massive data can be described by intervals [a, b] and multiple tables.
License: GPL (>= 2)
Depends: scatterplot3d, sqldf
Packaged: 2013-09-14 19:01:48 UTC; PSA
NeedsCompilation: no
Repository: CRAN
Date/Publication: 2013-09-15 09:53:08
22 changes: 22 additions & 0 deletions MD5
Original file line number Diff line number Diff line change
@@ -0,0 +1,22 @@
9e45fc6a619cce31984e57ea1eed13d7 *DESCRIPTION
840bc36e1e6bd9c854f1e67e3dd225b8 *NAMESPACE
3060c990074e604ec6cd524e8ab73570 *R/GPCSIV-internal.R
f0ee2cd2e4d2cc1106c490ca8455e8f3 *R/Resdata.R
1a7ae12de1841bb4429ac666489bf024 *R/gpca.R
81df9d03b411be777854ac7f55d3478e *data/Judge1.rda
19165a5dd91b38a7a27fab1141697b46 *data/Judge2.rda
01ac8c921e2b1af8f0f6bf3f0bb7001e *data/Judge3.rda
1311d3a34e752688829952336c42bc9b *data/oils.rda
c8a0a6530a4caaf68192898cd0eef961 *data/video1.rda
abdc325778a64e98151d00e714c7d37e *data/video2.rda
60317f08b95d1e2d4b82624c11c4db7f *data/video3.rda
caf44f0ad18faa23ed6300149604d108 *man/GPCSIV.Rd
64895d936d5662971272d4443acba865 *man/Judge1.Rd
7e84b10a04aa0495e45594b9ad1aef05 *man/Judge2.Rd
a0170a8ea10a3eccccbfbde294966bfc *man/Judge3.Rd
d6442c6d48d0f1713205ad8f028f3cff *man/Resdata.Rd
50d8934f727d47efaf5f14c2e7abd011 *man/gpca.Rd
fd2f7082d9693cc51df887c0d3598d9a *man/oils.Rd
dd477c46676024a342a762e72bf6711b *man/video1.Rd
c13c37d98fb7e107367a0920400a0f73 *man/video2.Rd
03775849b794ef5750122282f8f22123 *man/video3.Rd
3 changes: 3 additions & 0 deletions NAMESPACE
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
exportPattern("^[[:alpha:]]+")
importFrom(scatterplot3d)
importFrom(sqldf)
127 changes: 127 additions & 0 deletions R/GPCSIV-internal.R
Original file line number Diff line number Diff line change
@@ -0,0 +1,127 @@
.Random.seed <-
c(403L, 276L, 2054546775L, 1220314446L, -1891835851L, -1387528391L,
-339651661L, 14482856L, -1353265890L, 281882514L, -716291175L,
-1852532174L, -340695663L, 656196652L, 1500821857L, 245897960L,
252556408L, -1279244608L, -1710577898L, 1534231760L, -963892984L,
-2018393195L, -1486921317L, 1340967522L, -2113972964L, 1571520034L,
-1061600315L, 1552677759L, -83926217L, 406093416L, -2091880800L,
-1387554276L, 1558662029L, 1080057993L, 1065674246L, 682103982L,
240994011L, 558096930L, 1508304617L, 659951688L, -1030530206L,
-1517626253L, 1985824571L, -1015064333L, 161038821L, -531829437L,
-1557220050L, 713555775L, -1499990604L, 25560653L, 1332239665L,
628898868L, -1310994379L, -1355740285L, -1852066230L, 1854560699L,
435517159L, 1288061087L, -513001347L, -1879374523L, -2002388129L,
1984924072L, 436869211L, 36244162L, -1414545811L, -520831315L,
299056249L, 301532837L, 573903045L, -1563151738L, 880620630L,
-288517272L, -505568767L, -1950878062L, 2064150740L, 162472269L,
-1795067652L, 795895498L, 570412201L, -1169120880L, -1043573285L,
-836436587L, 1364290012L, -366765663L, 1496246771L, -768319268L,
952737675L, 2082594262L, -358828122L, 603756088L, 95551375L,
-376600080L, 398961041L, -299061118L, 785113623L, -2008823600L,
-294681349L, 1151375292L, -1435832947L, 502154870L, 1986546999L,
592958975L, 1055021229L, 1036945584L, 852651517L, -1675746939L,
-1731123912L, -538648631L, 800493795L, 1643031807L, 1888005626L,
-774739311L, -309468453L, -624771510L, 1137714797L, 1112815974L,
29728518L, 455858336L, 1080893912L, -1450827466L, 459771582L,
-753886106L, -130693037L, -794068477L, 628642412L, -929333335L,
1218072486L, -1987834273L, -1556302254L, 435278928L, 672638309L,
1030945783L, -1901469672L, -1099277090L, -565744548L, 788340232L,
1214660160L, 1717825522L, 2014567159L, -2092290163L, -164154908L,
-559504075L, 542419048L, -1896645444L, -2056588000L, 952040340L,
-2105216086L, -708183183L, 894523249L, -1431841012L, -1083995506L,
267320034L, 1107577490L, 1423527104L, 1028711735L, -62488152L,
-773192768L, -758298121L, 956583709L, 734107592L, -1342520755L,
1302559007L, 618392944L, 128654837L, -224294976L, -1941096403L,
-1889202294L, -715691468L, 1419648550L, 710998379L, 1387619079L,
1265609230L, -200600590L, -852175950L, -1620568771L, -2077137957L,
-1275631278L, 1717845581L, 1996283795L, 87373491L, -381280378L,
-970794034L, 813950353L, -833792649L, -1368026049L, -1465232539L,
1216763287L, -1276298391L, 1975825408L, -1226753355L, -1220143495L,
1805855160L, 290564260L, 1859058638L, -1137736705L, 1946050269L,
1125463876L, -826827421L, 318102904L, -1918624474L, 1733452856L,
-1002513565L, 292312722L, 1644005037L, -665783443L, -26485271L,
-1829550899L, 150196864L, 32600302L, 22347012L, 1079684004L,
-1815154099L, 81593624L, 1632781735L, -823386339L, -1153712012L,
314045657L, -911849037L, -1935169241L, -1828786600L, 1210055648L,
32096071L, -1159837279L, 1379396127L, -1039133811L, -1663202869L,
-1165458920L, -896723737L, 81053886L, 522657099L, -1597350072L,
254196431L, -90291759L, 1385653724L, 1030535435L, -692093944L,
-1146716754L, -2130847828L, 896746786L, -1695011855L, 913964808L,
520561731L, 1805457671L, -1066827940L, -1445192180L, -1918792952L,
712108797L, -757380603L, -1292419599L, 254733764L, 1161074243L,
-626085266L, -117430678L, -1514060386L, 1279330739L, 328312782L,
65246338L, 145715439L, -320890599L, -2082887138L, -872241582L,
1854514208L, 662158663L, -159157317L, 327530483L, -348079291L,
1922687216L, 1074209757L, -1088862357L, 1632521176L, 1112823465L,
115553852L, -1242530306L, -1289763905L, 1001463351L, -391254543L,
1354534363L, 1745331715L, -872005388L, -1394337499L, 508186476L,
-2083484874L, -627437196L, -110416716L, 1582474402L, 58270931L,
-1626970829L, -1244515852L, -1417233037L, 1169992168L, 1194956714L,
-331645705L, 1352287501L, -1531495531L, 1897090284L, -1754955510L,
-1189442689L, 75774362L, 579762181L, -1642521820L, 1826866084L,
-363750110L, 582587812L, -2066833365L, 205866649L, -58439763L,
1752928204L, 20045912L, -1893307130L, -34894410L, 1642634524L,
1080254291L, -1081072685L, 1819088322L, -1693056825L, -1693860789L,
-1933972911L, -1633634510L, 361576566L, -1329811453L, -966774660L,
1772423603L, 2059715847L, 2046096427L, -2094036582L, 293509538L,
-1930732114L, -659967785L, 1451795180L, 681540795L, -1238344399L,
-163567389L, -1683733199L, 1092395117L, -592432465L, 987497392L,
162140322L, -763594134L, 29112847L, -1882766797L, -2052184390L,
-672694420L, 540931538L, 620930528L, -2067146700L, -1601228372L,
-805181235L, -265833116L, -1165476468L, -532595435L, 2010267307L,
-1226079873L, -21061445L, -683276655L, 2119104202L, 715478235L,
202307338L, 1729708722L, -1136171633L, -1042693521L, 262540547L,
2012724007L, 1200243296L, -495475764L, 809635088L, 266026317L,
187128735L, 406849953L, 1641233998L, 2000499848L, -1712311296L,
-273181128L, -1717213368L, -1241623055L, -2133656256L, -481601971L,
1222947361L, 1660677377L, 1857722542L, -979749058L, 1486977292L,
1694436169L, -83160812L, -1048844520L, 641638888L, -689815650L,
95299934L, -1243029626L, 963037044L, 1132674139L, 913626944L,
-846051035L, 1604325119L, 1999917880L, -251774049L, 843055395L,
-1766871461L, 633805643L, -1533067402L, 1680211810L, 2099702730L,
-741076410L, -742992034L, 1635863675L, -986803061L, 1987826770L,
-668160035L, 613645643L, -540632254L, 34895425L, 571200303L,
-1704174270L, 1324889930L, -1404873208L, -354743372L, 539477058L,
1168055935L, -1471170177L, 1464580789L, 1626851911L, -1617211157L,
93533152L, 999903335L, -1677115052L, -1370846311L, 1577664521L,
603399694L, 1420739248L, 887539014L, -787990905L, 2135524537L,
-1850056589L, -1180335167L, 777071106L, -1781681295L, -181767828L,
646969954L, -590567561L, 762177159L, 749751631L, 676786247L,
-116821081L, 342152838L, 1293712349L, 863409005L, 200524381L,
855238419L, -176406829L, 411144834L, -1451932350L, -452531836L,
-110137183L, 1867577656L, 1469060633L, 1642607831L, -1982582874L,
931956094L, -1589878554L, -1961770235L, 1266375308L, 729909709L,
1005281388L, -1643059941L, -2052508206L, -509690881L, -1116051066L,
-1680792388L, 1084233501L, -463399393L, -1438270858L, 1764328521L,
2119215909L, 731266554L, -127519208L, -58029498L, 1974420551L,
1560701894L, -816097361L, 1978430202L, 2144209641L, 1705128934L,
450302184L, 436842904L, -1917955037L, 1107555547L, -438671935L,
617196261L, 1271941216L, -1924312277L, -1798667117L, 1686447433L,
610534715L, -795585622L, 1284170585L, 244291296L, -201190015L,
555695819L, 566736387L, -1620299950L, 1344587382L, 1646915639L,
-567137696L, -2063625390L, -1146873916L, 243635125L, 1538394309L,
1278875063L, 892710579L, -2131590788L, -2119444351L, -1846432549L,
820194136L, 860158543L, -1851684808L, -2057012254L, 392421274L,
-1132308618L, -1726880100L, -1085767115L, 869958447L, -551215393L,
1552723301L, -1764010464L, -961717624L, 1204056620L, 1398372857L,
2072846078L, -1115171791L, -277174247L, -1580937194L, 1982008594L,
-925408425L, 657247641L, -1834737987L, 166471228L, -2119557557L,
1331706914L, -561668524L, -186435926L, -1802570533L, 1200219383L,
1530552700L, -1967653554L, -1250162737L, 334554302L, 839424235L,
1791038753L, -353326121L, 1135489305L, 1312295905L, 651417230L,
-486451518L, -1701492705L, 288876278L, -1758016951L, -1616981391L,
623349951L, -772839813L, 1185926251L, 1182041290L, 1363713790L,
-1112895404L, 512039385L, 1489207398L, 1004583104L, -1513808684L,
1314494820L, -1440099857L, -2038229018L, 108958856L, -1387498399L,
1544109213L, -411908328L, -644444942L, 1337096446L, -1836614873L,
-550652533L, -1824197825L, -1178571709L, 991891817L, -1207475007L,
1689412858L, -1933843124L, -1788445164L, -599945732L, -635327602L,
-957362353L, -1338135586L, -1568020994L, -1864193524L, -1384634342L,
-832256643L, -1201377896L, -829747569L, 39742933L, 459382427L,
-1072520599L, 1522639703L, -961521719L, -2112483131L, 244410677L,
-962797757L, -936451625L, 912109713L, 1631464122L, -1919076433L,
-501891113L, -548202750L, -771808571L, 1819056459L, 669244660L,
1615802246L, 245679628L, -1556594184L, 1325225383L, -1814022163L,
420602932L, -1230701944L, -602098340L, -359694884L, 594087985L,
1327797346L, -245938677L, -563956544L, 1294253902L, 1085111554L
)
44 changes: 44 additions & 0 deletions R/Resdata.R
Original file line number Diff line number Diff line change
@@ -0,0 +1,44 @@
Resdata <-
function(enter=list)
{
prepdata = function(g,nomVar=NULL, nomInd=NULL){
nligne<-nrow(g)
ncolon<-( ncol(g) )/2
if( is.null(nomInd) )
{
nomInd<- paste("Row", 1:nligne, sep = "")
}
g = t(g)
g=data.frame(g)
x <- matrix(2:(nrow(g)+1), nrow = nrow(g), ncol = 1 )
colnames(x) <- paste("obs")
x=data.frame(x)
g <- cbind(x , g)
v=x%%2
colnames(v) <- paste("obs1")
v=data.frame(v)
g <- cbind(v, g)
tmin <- sqldf("select * from g where obs1 = 0")
tmax <- sqldf("select * from g where obs1 = 1")
tmin = t(tmin)
tmax = t(tmax)
tmin=tmin[-c(1:2),]
tmax=tmax[-c(1:2),]
rownames(tmin)<-nomInd
rownames(tmax)<-nomInd
colnames(tmin)<-paste("Var", 1:ncolon, sep = 'Min')
colnames(tmax)<-paste("Var", 1:ncolon, sep = 'Max')

return(list(tmin=tmin,tmax=tmax))
}
enter<-as.list(enter)
long<-length(enter)
resmin<-vector('list',long)
for(i in 1:long)
resmin[[i]]<-prepdata(enter[[i]])$tmin

resmax<-vector('list',long)
for(i in 1:long)
resmax[[i]]<-prepdata(enter[[i]])$tmax
return(list(tablemin=resmin,tablemax=resmax))
}

0 comments on commit ebe8797

Please sign in to comment.