How do I convert the following R data into a .GEXF format for Gephi? :     # My first attempt at building a bipartite graph of co-authors of PubMed publications
    # using the list of articles with Molina JM as one of the authors as a start (around 226)

    # the following is a sample of the input file (just one csv line)
    
    # 11810598;Chêne G, Angelini E, Cotte L, Lang JM, Morlat P, Rancinan C, May T, Journot V, Raffi F, Jarrousse B, Grappin M, Lepeu G, Molina JM;2002;Mar;Role of long-term nucleoside-analogue therapy in lipodystrophy and metabolic disorders in human immunodeficiency virus-infected patients.

> InputFile = 'JMMolina_PubMed.csv'

    # Read the CSV input file into the initial JMMpubs data frame

> setwd('~/Dropbox/R')
> JMMpubs <- read.csv(file=InputFile , header =
> FALSE , sep = ";" , strip.white = TRUE) 

> names(JMMpubs) <- c("ID","AuthList", "Year", "Month", "Title")

    # build a new data frame IdAuth with one Id line for each coauthor
    # therefor the first article which has 13 co-authors will generate 13 lines with the same Id

> Authors <- strsplit(as.character(JMMpubs$AuthList), split = ", ")

> IdAuth <- data.frame(Id = rep(JMMpubs$ID, sapply(Authors,length)), Author = unlist(Authors))

    # Now I would like to export this data to Gephi
    
    # The nodes of the graph should be the UNIQUE names in Authors

> UniqueAuthors <- unique(unlist(Authors))

    # The edges of the graph should be each row of IdAuth
    # If possible I would like to associate the year of the publications as in JMMpubs$Year to each edge 
    # so that I could paint the more recent edges in red and older ones in paler hues

