430369_zh-CN

liliconcom

如果列格式奇怪，如何将其更改为时间

大家好，

 

我有一个列有时间，它的格式像这样 01h17m03s 我想制作这个连续的数据，但我尝试做的一切都不起作用。 我可以使用脚本来改变它吗？

 

任何想法都会非常有帮助。

 

谢谢，

 

-瑞安

数据表脚本编写回复：如果列的格式奇怪，如何将其更改为时间

您可以使用一个公式，其中 :txt 是您的时间列：

InHours(Num(Word(1, :Txt, "hms"))) + InMinutes(Num(Word(2, :Txt, "hms"))) + Num(Word(3, :Txt, "hms"))

然后将列更改为数字连续并格式为时间 h:m:s（可能因您的时间格式而异）

 

 

回复：如果列的格式奇怪，如何将其更改为时间

Names Default to Here( 1 );

// make data like 01h17m03s
dt = New Table( "Time",
 Add Rows( 10 ),
 New Column( "Original", Character, Ordinal ),
 New Column( "Converted", Numeric, Continuous, Format( "H:M:S" ) )
);

// utility
padded = Function( { l, h }, { v },
 v = Random Integer( l, h );
 v = If( v < 10, "0", "" ) || Char( v );
);

// populate original value
For Each Row(
 h = padded( 0, 24 );
 m = padded( 0, 60 );
 s = padded( 0, 60 );
 :Original = Concat( h, "h", m, "m", s, "s" );
);

// now convert it to JMP time number
For Each Row(
 :Converted = Eval(
  Parse(
   Regex( :Original,
    "(\d\d)h(\d\d)m(\d\d)s",
    "\3 + 60*(\2) + 3600*(\1)"
   )
  )
 )
);