C#编写一个时间周期循环的问题

Posted 2023-03-18

用C#编写一个时间周期循环的问题：比如一个循环一分钟循环一次，在每个一分钟循环内进行获得该程序进行的时间，怎么办啊？高人指点一下啊，或者email我[e-mail] 我把分全给你！
示意图如图~~

参考技术A 这个问题的效果就像任务管理器中的cpu使用记录的曲线。

1，用Timer控件或者用线程的sleep方法，控制几个变量，包括绘图在区域内的起始座标，矩形的个数，分段的座标（数组）
2.在窗体的onpaint事件中一直画，画的依据是上面的变量，就是按上面的变量画出排列的矩形，写上字
3.在1中隔段时间将窗体无效一次，强制画一次。 参考技术B 我C#不知道怎么使用时间类，但是我觉得语言相通的，可以用它的孪生兄弟Java给你写出来

while (!isEnd)
long beginTime = System.currentTimeMillis();
做你的程序
long endTime = System.currentTimeMillis();
long intervalTime = endTime - beginTime;
if (intervalTime < 60)
try
Thread.sleep(60 - intervalTime);
catch (InterruptedException e)
e.printStackTrace();




我的觉得原理是一样的，这个是一个游戏的引擎，是一个while循环，每60秒重画一次，这个是精确的确保60秒画一次，而你需要的是运行时间，所以，只要建立一个变量存储就可以了，C#原理应该是一样的。 参考技术C 这个有点像《编程之美》里面的题目啊。

那里面还有让cpu使用率走正弦什么的曲线呢？

可以copy我空间的代码改一下看看，不会再问我。

http://jonile.spaces.live.com/?_c11_BlogPart_BlogPart=blogview&_c=BlogPart&partqs=amonth%3d11%26ayear%3d2008本回答被提问者采纳 参考技术D ts对象就代表了程序进行的时间。
TimeSpan ts = new TimeSpan();
TimeSpan period = new TimeSpan(0, 0, 60);
System.Threading.Timer timer = new System.Threading.Timer(
delegate(object obj)
ts += period;
//do something
Console.WriteLine(ts);
, ts, 0, 1000); 第5个回答  2009-10-08 用Timer控件 或者用线程的sleep方法

如何在 R 中编写一个 for 循环来设置列表中数据集的周期以及开始和结束日期

【中文标题】如何在 R 中编写一个 for 循环来设置列表中数据集的周期以及开始和结束日期

【英文标题】：How to write a for loop in R to set periodicity as well as start and end date of datasets in list

【发布时间】：2021-09-23 00:55:12

【问题描述】：

我正在尝试设置列表中数据集的 start_date 和 end_date 以及它在 R 中的周期性。但我无法编写用于选择列表中数据集的 for 循环。

代码如下

require(quantmod)
require(xts)

econ_data <- new.env()

symbols <- c('ICSA', 'INDPRO', 'NFCI'
)

getSymbols(Symbols = symbols, src='FRED', env = econ_data)

data <- eapply(env = econ_data, FUN = merge.xts)

#Now I want to set the start and end date of all datasets and it's periodicity together, same. (I tried with xts functions but was not able to, I think a proper for loop can do the job, not sure)

如果有人能帮助我，那就太好了。 :)

【参考方案1】：

您不需要显式的 for 循环。

ICSA <- get("ICSA", envir = econ_data)
INDPRO <- get("INDPRO", envir = econ_data)
NFCI <- get("NFCI", envir = econ_data)

# merge to xts
data <- do.call(merge.xts, args = list(ICSA, INDPRO, NFCI))
# remove NAs and carry forward last observation
data_clean <- na.locf(data, na.rm = T, maxgap = 10)
# monthly observations
data_monthly <- data_clean[xts::endpoints(data_clean, on = "months")]
# reduce timeindex
data_reduced <- data_monthly['2005-01/2010-12']
> head(data_reduced)
             ICSA  INDPRO     NFCI
2005-01-29 331000 96.1164 -0.72024
2005-02-26 314000 96.8200 -0.71388
2005-03-26 342000 96.6725 -0.70228
2005-04-30 334000 96.8638 -0.66024
2005-05-28 340000 96.9622 -0.62226
2005-06-25 311000 97.3530 -0.63855