Question

我看过以下问题： How to add days to current date in clojure

但是我对Clojure很新，我在以下场景中遇到困难我正在以字符串格式获取时间戳。所以我使用以下内容解析它：

(.parse (java.text.SimpleDateFormat. "yyyy-MM-dd") date)

这给我一个看起来像这样的结果：

#inst "2015-02-13T00:20:00.000-00:00"

如何为此添加90天，然后将其转换回字符串格式？我根据以上链接尝试了这个：

(java.util.Date. (+ (* 7 86400 1000) 
                    (.parse (java.text.SimpleDateFormat. "yyyy-MM-dd") date)))

这给了我以下错误：

ClassCastException java.util.Date cannot be cast to java.lang.Number  clojure.lang.Numbers.add

Answer 1

parse会返回java.util.Date，您看到的错误告诉您，您无法将Date投放到Number。您可以使用getTime来获取Date：

的毫秒数

(java.util.Date. (+ (* 7 86400 1000)
                 (.getTime (.parse (java.text.SimpleDateFormat. "yyyy-MM-dd") date))))

此可能会在此日期后添加7天。如果您希望可能添加90天，则需要将90替换为90，如下所示：(* 90 86400 1000)。

您还可以使用java.util.Calendar：

(let [cal (Calendar/getInstance)
      d (.parse (java.text.SimpleDateFormat. "yyyy-MM-dd") date)]
  (doto cal
    (.setTime d)
    (.add Calendar/DATE 90)
    (.getTime)))

或者更好，clj-time：

(require '[clj-time.core :as t])
(require '[clj-time.format :as f])

(t/plus (f/parse (f/formatters :year-month-day) date)
        (t/days 90))

Answer 2

如果可以避免，我建议不要在新代码中使用旧版日期和时间API。

Java 8为日期带来了一个新API，您可以优雅地表达此问题：

(-> (java.time.LocalDate/parse "2015-02-13") (.plusDays 90) str)

甚至，采取所有捷径：

{{1}}

Answer 3

clj-time有 from-now 和 ago ：

(require '[clj-time.core :refer [days from-now]])

(-> 90 days from-now)

=> #object[org.joda.time.DateTime 0x4d8bcee3 "2017-01-11T16:03:40.067Z"]

(require '[clj-time.core :refer [hours ago]])

(-> 7 hours ago)

=> #object[org.joda.time.DateTime 0x3eef2142 "2016-10-13T09:19:01.246Z"]

可用 PeriodType 定义：years，months，weeks，days，hours，{{ 1}}，minutes。

生成的Joda seconds对象可以很容易地被操作，例如以毫秒为单位的unix时期：

DateTime

(require '[clj-time.coerce :as coerce]) (coerce/to-long (-> 90 days from-now))

Answer 4

此解决方案返回java.util.Date：

(defn add-days-to-instant [num-days ^java.util.Date d]
  (.getTime (let [cal (Calendar/getInstance)]
              (doto cal
                (.setTime d)
                (.add Calendar/DATE num-days)))))

如何在Clojure中添加日期到日期

4 个答案: