library(projmanr)
library(plyr)
library(lazyeval)

data<-read.table('network diagram.txt',h=T,as.is = T)
gantt(data)

出现了问题：Error in data.frame(id <- task$id, name <- task$name, start_date <- task$start_date,  :
  arguments imply differing number of rows: 1, 0

数据是这样的一个txt文件
id name duration pred
S start 0 ""
A A 1 S
B B 2 A
C 2 1 B
D 2 2 A

可能是第一行的空值产生了问题，请问怎么解决