Edson,
Não sabendo exatamente para quê você necessita a diferença, talvez lhe convenha ter este aditamento:
a diferença após a conversão das cadeias de caracteres com strptime() pode ser feita diretamente:
> hht[2]- hht[1]
Time difference of 30 mins
se você quiser apenas o valor numérico, pode-se obtê-lo por:
> as.double(hht[2]- hht[1])
30
se as unidades forem importantes:
> units(hht[2]- hht[1])
[1] "mins"
Ademais, se você quiser "normalizar" as unidades, para evitar o seguinte:
hh <- c("10:00","11:30")
hht <- strptime(hh, format = '%H:%M', 'GMT')
as.double(hht[2] - hht[1])
1.5
units((hht[2] - hht[1])
"hours"
você pode fazer
as.numeric(hht[2] - hht[1], units="mins")
90
HTH
--
Cesar Rabak